tt tt St I tt St SH SH tH 
AAA St St HHH 
ee) 


L 

LLLLLLLLLLLLLLL 
LLLLLLLLLLLLLLL 
LLLLLLLLLLLLLLL 


S 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 
$ 


PMMEARSE 


PRHAPAPRPARAGRHAGAG 


**F ILE**1D**VMSVECTOR 


ecaeacc ca 
eccacc ca 

rca ca ca 

ca ca ca 

ca ecccac 

ca eace 

cc cc 

ca cc 

@Qaanaancaacacacacaca 

@Qaanaaacacaacacaca 
SSssssssss 
Soooo0o0o[000o 

oo ss 

oo Oo 

oo late) 

oo oo 

oo Ss 

oo o 
SSssssssss 
ooooooce0°0o 

—e 

— 

ee 

Fb 

— > > > > bb he 

— -— > > > bb > bb er 

Fe 

— 

— 

— 

Vu VV 

Vu Vu 

Vu VwvV 

ww Ww 

wu Wu 

ww Vu 

ww vu 

ww wu 


VBYVYVYVYVUUUYUY 
VUYYVYUUYUYUUYUUUYYU 


usu ww 
wu wuss 
usu wud wu 
wu ereey usu 
peeare) array usu 
tad ad uu usu 
wus Ad LA usu 
tia wud as 


[UU TSU ICU TUS TUS TUS SU lvulvw lvulvulververcw) 
[US TES VCS TUS IVS TVS ivelvelvelvelvereuree) 


>>>>>>>>>> 
>>>>>>>>>> 


LLLLLLLLLL 
LLLLLLLLLL 


SSVECTOR 
Table of contents 


33} 08 


J 
- Define entry vectors for VMSRTL 


MTHS$AB_ALOG = T 
AN=- T 


le for ALOG routines 
MTHSSAB_AT le f 


ab 
ab or ATAN routines 


16-SEP-1984 02:15:59 VAX/VMS Macro v04-00 


te , 
VMSSVECTOR - Defi -SEP- 
yAssy Define entry vectors for VMSRTL 16-SEP 1384 Oe: | +3? AX/VMS 


Macro V04-00 P 
~SEP-1984 VMSRTL.SRCIVMSVECTOR.MAR;1 > 
TITLE VESEYECTOR - Define entry v yortors for VMSRTL 
IDENT /4-003/ : File: VMSVECTOR.MAR Edit: MDL4003 


PARRA RAAAARARAAAAAASALSALELAL ELLA ESSE ESE SESE REESE ES ETE EEE SESE CPCS Pee cea cas | 


COPYRIGHT (c) 1978, 1980, 1982, 1984 
DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


ONLY IN eet DANCE WITH THE TERMS OF SUCH biceR NSE AND WITH THE 
INCLUSION THE ABOVE git NOTICE. THIS SOFTWARE OR ANY OTHER 
COPIES THEREOF ai NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 

THER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
sORPORATI On NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONS 
SOFTWARE ON EQUIPMENT WHIC 


ITY FOR THE USE OR RELIABILITY OF ITS 


IBILITY 
H IS NOT SUPPLIED BY DIGITAL. 


e@e te Ge e@e Ge 
aenenenenenennnnnennnnannnne 


cy 
8 
* 
oT 
e 
* 
* 
t 
0 # 
TRANSFERRED. * 
& 
* 
* 
* 
7 
8 
% 
uy 
a 
® 


PARAAARASAAAAAALAAAALALAALLE SELES SESE SESE REESE ERE R ERS R EEE ERE REESE ER ER ERE SS | 


SOOooooooooooooooooooooooooooo 
COoOoOQoCooooooooooooooooooooooo 


OQOCOOCCOOCoOOoOoOOoOoOoOOoooooooSo 


FACILITY: VAX/VMS Run-Time Library 


"ABSTRACT: 
This module contains the entr vector for the shareable image 
VMSRTL.EXE. VMSRTL_ is now only a ‘‘stub’’ that references procedures 
in LIBRTL, MTHRTL, BASRTL, COBRTL and FORRTL. 


VERSION: 1 
Revision History: 
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oo 


4-001 - Boat ties from ALLGBL.MAR to only produce vector declarations. 


£008 - tr By ALOG and MTHSAB_ATAN table copies to end. SBL 20-May-1983 
- Add OLDENTRY macro for obsolete entry points. MDL 26-Sep-1983 
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; NOTE: This module contains many comments which are now of only historical 
Hy significance. The image VMSRTL mostly consists of vectored entry 

3 points that refer to procedures in other shareable images. However, 
: a rom Sete tables that were in VMSRTL remain since they cannot be 

; revectored. 


+ 
Define macro MAC to generate vector entries. 
call: MAC VEC_TYPE, VEC_AREA, SYMBOL, MASK 


where VEC_TYPE is: CALL call entry point transfer vector 


SOOO NAUE WIN | 9 OONAUE WN 0 OONAUE WO OONO 


Each entry vector is 8 bytes tong and contains a 2 byte mask and 
a 6 byte JMP instruction (for CALLs) or 
a 6 byte JMP plus 2 filler bytes for JSBs. 


SOSOCOCOOSOOSOSOOSOSCOOSOSOOOOOSOOSOOOSOOOOOOOOOOOoOO 
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SOQOCOooooooooooooooooooooooooQoooooooooo 
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: $B - JSB entry point transfer vector 

: NOVECT = do not have a transfer vector 

5 SYM - this is a symbol, not an entry point 
3 TA - this is data, kept in the vector 

3 FUTURE = this is a proposed entry point, not yet 
: inp lonentes. but space reserved. 

; VEC_AREA is: FOR - FORTRAN entry points 

3 LIB - torary entry points 

$ MTH - Math Library entry points 

3 STR - String library entry points 

3 OTS - Language independent entry points 

3 BAS - BASIC-PLUS-2 entry points 

3 COB - COBOL 

: Note: VEC_AREA is ignored 

; SYMBOL is: any entry point symbol 

3 MASK is: optional entry mask if not same as SYMBOL 
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»MACRO MAC VEC_TYPE, VEC_AREA, SYMBOL, MASK 
IF IDN VEC-TYPE, JSB” 
$S'SYMBOL':: 
JMP ¢* SYMBOL 3 branch to JSB routine 
100 BYTE 0 ; fill out to 8 bytes 

09 ; 1 -ENDC 

6 1 : IF IDN = VEC_TYPE, CALL 

88 104 $$'SYMBOL': 

0 105 If B MASK 
009 : $ ya SK SYMBOL 

108 "MASK MASK 3; get mask from other name 
38 109 -ENDC 
000 110 JMP S*SYMBOL+2 3; branch to CALL+2 routine 
0000 111 ~ENDC 
0000 MN 
0000 «(11 IF ION VEC_TYPE, FUTURE ; Reserve space for future vector? 
0000 114 -BYTE 0,070,0,6,0,0,0 : leave 8 bytes 
0000 115 ENDC 
0000 116 
0000 117 ~1F IDN VEC_TYPE, DATA 
0000 118 $$*SYMBOL' V:: 
444 1% “ABA DRESS biden 3; from non-shared routine. Has format: 
0000 121 ; ADDRESS  table_name-. 
0000 1 ¢ -ENDC 3 ~BLKL 1 
0000 1 
0000 124 .ENDM 
0000 125 
0000 126 .MACRO tei SYMBOL 
0000 127 $$ "sv apa 
$333 135 
00000000 130 -PSECT S$VMSS$VECTOR PIC,USR,CON,REL,LCL,SHR,EXE,RD,NOWRT, PAGE 

44 13) RTLSSTART: 


FORTRAN compatibility routines - do not VECTOR 


; MODULE: AX PROASS ISR 
NOVECT COM ASSIGN 


MODULE : EXPrOc ose 


OVECT COM CLOSE 


ee 
OVECT COM ERRSET 


MODULE : 1 aman 
NOVECT COM ERRTST 


MODULE : NY eat 
NOVECT COM FDBSET 


as COM$IRADSO 
MAC NOVECT COM IRADSO 


MODULE: NY spate 
MAC NOVECT COM RSOASC 


MODULE : OY aecteg 
MAC NOVECT COM RAD50 


; MODULE: Os sata 2 
MAC NOVECT COM USEREX 
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00 166 ;+ 
0 189 ; FORTRAN entry points 
0 198 ; Put most Sy oo eae used FORTRAN entry points together first, 
0 AS ; ie. 1/0 and OPEN and CLOSE. 
0 170 5- 
0 171 
00 176 ; MODULE: FORSCLOSE 
4 17 FOR FORSCLOSE 
00 174 ; MODULE: FORSENTRY 
Bay 173 MAC CALL FOR FORSDECODE_MF FOR$$10_BEG 
0019 177 MAC CALL FOR FORSDECODE_MO FORS$S$IO_SEG 
018 178 MAC CALL FOR FORSENCODE-MF  FORS$$IO~BEG 
8 : 4 MAC CALL FOR FORSENCODE_MO FORSS$IO_BEG 
00 181 MAC CALL FOR FORSREAD_KF FORS$$IO_BEG 
8 136 MAC CALL FOR FORSREAD_KO FOR$$10_BEG 
0038 184 MAC CALL FOR FORSREAD_DF FORSS$IO_BEG 
0040 185 MAC CALL FOR FORSREAD_DO FOR$$10_BEG 
0048 186 MAC CALL _—- FOR FORSREAD_DU FORS$$10_BEG 
iF 187 MAC CALL FOR FORSREAD_SF FOR$$10_BEG 
Bo2p 138 MAC CALL FOR FORSREAD_SL FOR$$10_BEG 
eee 190 MAC CALL FOR FORSREAD_SO FOR$$10_BEG 
68 191 MAC CALL FOR FORSREAD_ SU FORS$$10_BEG 
0070 136 MAC CALL FOR FORSWRITE_DF FORS$$10_BEG 
0078 193 MAC CALL FOR FORSWRITE-DO = FORS$IO_BEG 
0080 195 MAC CALL FOR FORSWRITE_DU FORS$I0_BEG 
0088 196 MAC CALL FOR FORSWRITE_SF FORS$$10_BEG 
0090 197 MAC CALL FOR FORSWRITE-SL § FOR$$I0~BEG 
0098 198 MAC CALL ~—- FOR FORSWRITE-SO FORS$IO_BEG 
BR Ag spe MAC CALL FOR FORSWRITE_SU FORS$$10_BEG 
00A8 oes 3; MODULE: FORSIO_END 
OOA8 20 MAC CALL FOR FORSIO_END 
00B0 204 
00B0 205 ; MODULE:FORSIO_ELEM 
0080 06 
0080 207 MAC CALL FOR FORSIO_F_R 
008 08 MAC CALL FOR FORSIO-F_V 
oc 09 MAC CALL FOR FORS$IO_D_R 
O60 1 MAC CALL FOR FORSIO_D_V 
00D \¢ MAC CALL FOR FORSIO_L_R 
OD 1 MAC CALL FOR FORSIO-L-V 
OE 14 MAC CALL FOR FORSIO_B_R 
BE 1? MAC CALL FOR FORS$IO_B_V 
it 1H MAC CALL FOR FORSIO_T_DS 
OF 15 MAC CALL FOR FORSIO_W_R 
10 0 MAC CALL =: FO FOR$IO-W_V 
1 1 MAC CALL FOR FORS$IO_G_R 
11 2 MAC CALL ~—- FOR FORSIO-G"V 


———____—_—_——_- —— ee 
| wo 
ow 
; se 
@© 
a 
} © 
; a | 
= 
*. 
| 4 
ba 4 
= 
o 
a 
oo 
or 
iw 
ww 
o> 
>uw 
= 
o> 
nm 
ev 
LT +4 ao] 
=m c 
° aw 
“nu 
=e wo ~ 
>a c oe 
~w @ 
<= 71) 
<> rs @) 
>w «a Cc 
= 
7) ° 
ow ~~ ud a= JOMN 
Wo —~a Vv eee ow um Oo 
2 2 Qees era>a>a < own Vv Ne ee —- — — 
wo a> ttorm>1_ite_seet & a ae Lh Lael ae eel eel ed el 4: Se be bm be v q ' o) 
- ws tt ww RYDaZDDD I ‘= ” Sau MMwwit 6+OOOO - 2B OB lel 
xx AO OF uu II33x z a » OOo TIOwwMwvv ciititisa q 4 1 ‘ w 
Ne te ttm @eoeeeees w a=) Yv >>OOwwe--OOOD ewrr> >> OO §- F- F- & me 
o- OO OCoO—~O0000 00°0o°o a — at a tt at ag 5 tt te 2222 ior7r> > < 
ee at at Og Ot og tg Og oO °o @ === O03 BevVevev SOVwWwUUVUUY a 
TT AGH HH SHAHAPAAGAGAGA BP A PHAGAPAAPAAAAAA VWARGA FMW WM WwW Ca 
oo Qa Qa aaoadacacac « ~ « Saeeceeececeaeacaeac 2eeee Vk ee oe oe « 
oon OO OO OO0O0C000O oO eo o lelelelelelelaloelelalal~=) ooo0o0 #72023>023030 oO 
“wy ee WMH OUUNUNKEE “_ (s) o A Oe Oe te ool. te te | aa new pale hee om 
be aad 
aa to rr > > > 
ww wo a2aas& & 
wn 2 Ov Vv vv YY 
i) oO oF Ff GF A 
©oo aa aga acacacacacac < = « Qaeacacaaraeacaanc eccecacc vaeacaacac&ca&cc [- 4 
_ oo oO OBDO0OOO0Oo0O°0oO o a oO lelelelelaleleleleleal=a| =) oooo sQoOQooooooo oO 
a 
4) w ee hh — = 
t. a vw VLUVVOVVVOVVYVUU (=) 
aa dd I LI LI LI LI LI a — <zu pee Tee les [ee lve lye velverververrerry) a ‘ a a a al uw 
at wad J...) .j.J.JJ a be an W>>>>>>>>>>7>> a ee | a a at al => 
vw «<a aa e«ecetaaacacae ¢ cd Yt AdDOOCOCOCOCOCCOCOCO reeeac - ace te «ct <« o 
VY VY VLULULULYUYLYU ZY Cc MY O22S22222222222 Jovuwrdw & vw wv wv VY we 
uw @ v = i er > - } — 
a. < _ > >ac fc = «= < 
oO A @ @ vw erF F- F- o 
PA [. 4 a2 a A Az 2 Ez or 
ae Oo fo 4 a ” Gow w we ww < 
VY VY VLLUYULUYULYU OU “ OV OVVVVVOVVOVVYU  KLUYLOYU ODOYVOYVOVOAY OW 
aa aa eteetetaeaedetaet ict wt udteeteteetetaeeeeet OEE 2 Jeti iat wt 
z= Fe FEFEEEIETES = a “=z sESSESESLELSESIEZ=E zzz=z OZtOozkozokzk «= 
w o w w w uw w 
— | a —_ J ad 
-_ oo > => —_ = = 
a “ a a a a a 
So a Oo o oOo So oO 
= i. 4 = = = = = 
o *e *e — *e 


+ ‘ 
ee*e *6 *e 
PATNOR- ODO — CIM TFNOR. DAKO CIM TN OR. OA O — CUM TIN OR. DHOOM MIM TFN OR. DHOK MUM TN OR- OD 
ROO OS OEE EEEEEI FS SF SF SF SF SFT TTT VNOAUNUAAUNAAUAUN OOOO OOOOOOR-F-P-PR-AAAA RR. 
NOOO OOOO OOOO OI OS OI OS OI OSI OI OS OI OS OI OS OI OI OI OI OI OI OS OI OI OI OS OI OI OI OSI OI IOI OI OI OSI OS OI OI OI OI OIONIONI ONIONS 


DODDWODWWDMOWDOWOWOWDWOOOOCOCOOD600000 0000 60 00 G0 C0 GD aD AD GD GO COCO OOO COCOA ECODOCGO Oda 
NUON AT TUN OOP. BR. B. BR. 00.0000 0000 00 CO CO GO COCO GO CO GOGO CO DO COCO OMODOS tf CC OODODOVVVvw 
LL LLL 


OOOO OCOCOCOOOOSOSOOSOSOSOSOSOSOSSOSOSSOSOOSOOSSOSOSOSOSOOSOSOSOSOSOSOSOSOSOSSOOOOOOSOSOOSooO 


- Define entry vectors for VMSRTL 


_— 


VMS$ 
4-00 


1) 
- Define entry vectors for VMSRTL 


ann 
mm 
vv 
ts 
—— 
0.0 
000 
~o™ 
-o 
=n 
se 
ow 
ou 


; MODULE: grgnseate t 

; MODULE: FORSDEFINE FILE 
MAC CAL 0 
; MOUDLE FORSENDF ILE 
MAC CALL 


; MODULE: FORSENODEF 
MAC SYM 
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FORSDATE_T_DS 


FORSENDF ILE 


FORSK_ADJARRDIM 
FORSK_ARRREF OUT 
FORSK_ATTACCNON 
FORSK_BACERR 


R$K_CLOERR 
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1E 7 MAC SYM FOR FORSK_NO_SUCDEV 
1E } MAC SYM FOR FORSK_OPEDEFREQ 
M3 i6 MAC SYM FOR FORSK_OPEFAI 
1E 4) MAC SYM FOR FORSK_OUTCONERR 
1E r{ MAC SYM FOR FORSK_OUTSTAOVE 
1E 4 MAC SYM FOR FORSK_RECIO_OPE 
1E 44 MAC SYM FOR FORS$K_RECNUMOUT 
1E 45 MAC SYM FOR FORSK_REWERR 
1E 73 MAC SYM FOR FORSK_REWRITERR 
1E 4 MAC SYM FOR FORSK_SEGRECFOR 
1E 8 MAC YM FOR FORSK_SPERECLOC 
1E 4 MAC SYM FOR FORSK_SYNERRF OR 
O1E 50 MAC SYM FOR FORSK_SYNERRNAM 
OIE 51 MAC SYM FOR FORSK_TOOMANREC 
BiEp 2¢ MAC SYM FOR FORSK_TOOMANVA 
1E0 5 MAC SYM FOR FORSK_UNIALROPE 
Q1E0 54 MAC SYM FOR FORSK_UNLERR 
01E0 55 MAC SYM FOR FORSK_VFEVALERR 
BiEp 2$ MAC SYM FOR FORSK_WRIREAF IL 
Sif 58 ; MODULE: FORSERRSNS ; See also end where FORSSERRSNS_SAV declared 
O1E0 359 MAC CALL FOR FORSERRSNS 
BiEe 9 MAC CALL FOR FORSERRSNS_W 
01FO 66 ; MODULE: FORSEXIT 
01FO 6 MAC CALL FOR FORSEXIT 
8308 rt: MAC CALL FOR FORSEXIT_W 
6 00 66 ; MODULE:OTSSCVTTR 
0200 67 ; This module is a replacement 
0200 68 : for FORSCNVIR, The old 
00 4 ; FORS entry point still exists. 
8 0 ; See Later where other OTS$ 
+ 4 3 entry points are named. 
0 00 g OLDENTRY FORSCNV_IN_DEFG ; Same as next symbol. 
0 0 rs MAC CALL OTS OTS$CVT_T_D 
020 76 ; MODULE: FORSF IND 
8 , g MAC CALL FOR FORSF IND 
1 79 ; MODULE:OTSSCVT_TI_L - replaces in part FORSCNVII 
1 0 OLDENTRY FORSCNV_IN i 
: MAC CALL OTS OTSSCVT_TI_L 
1 : ; MODULE:OTSSCVT_TL_L - Fepieces in part FORSCNVI! 
1 4 OLDENTRY FORSCNV_IN § 
1 5 MAC CALL oTSs OTSSCVT_TL_L 
5 ; MODULE: OTSSCVT_TO_L - ropneces in part FORSCNVII 
8 OLDENTRY FORSCNV_IN 
9 MAC CALL oTs OTSSCVT_TO_L 
? OLDENTRY FORSCNV_IN q 
2 MAC CALL OTS OTSSCVT_TZ_L 
38 ; MODULE: FORSIDATE 
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MODULE : FORSMSGDEF 


; MODULE: FORSJDATE 
MAC 
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MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYA 
MAC SYM 
MAC SYM 
MAC SYM 


MODULE : FORSPAUSE 
MAC CALL 


MODULE : FORSRANDOM 
MAC NO 


VECT 
MAC NOVECT 
MAC NOVECT 


MODULE : FORSREWIND 
MAC CALL 

MCDULE : FORSSECNDS 
MAC CALL 

MODULE : FORSSTOP 
MAC 


CALL 


MODULE : FORSTIME 
MAC NOVECT 


3 MODULE :FORSTIME_T_DS 
MAC NOVECT 


Ss ns Ps Pe Be dk 
sssssss3sss oooo 


FOR 


FOR 


za 
aad 


OMA\ 
NIALROPE 
NLERR 
EVALERR 
IREAF IL 


WTNH HHH AAA 
oOooooo°0°0o oe00°0o 
DBDDDBADADAD BDWAUAwD 
Oe ed AMAM 
£<cc3-4onn— os MBDD 


FORSPAUSE 


FORSIRAN 
FORSRANDU 
FORSRANDU_W 


FORSREWIND 
FORSSECNDS 
FORSSTOP 
FORSTIME 


FORSTIME_T_DS 


=o 
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P-19 VMSRTL.SRCIJVMSVECTOR.MAR; 1 (6) 
6 491 i+ 
6 138 ; Mathematical i ierery entry points 
6 $82 5. i Include the frequently used ones first (ones with JSBs) 
495° 
238 ; MODULE:MTHSACOS (Degree entries reesose on) 
49 MA CALL T MTHSACOS 
LDENTRY ; Release 1 name 
49 OLDENTR MTHSACOS_R5 Rel 1 
, 49 MAC JSB MTH ATHSACOS_R4 
7 ° 3; MODULE: MTHSALOG 
7 § MAC CALL MTH MT a oe 
8 MAC CALL MTH MTH 219 
4 MAC JSB MTH prtisat ost RS 
g 5 MAC JSB MTH MTHSALOG_ R5 
9 89 3; MODULE: MTHSASIN 
Me 08 MA ALL MTH MTHSASIN 
A 09 OLDENTRY MTHSASIN_RS ; Release 1 name 
he 10 MAC JSB MTH ATHSASIN_R4 
8 A \¢ ; MODULE: MTHSATAN 
A8 1 MAC CALL MTH MTHSATAN 
0280 14 MAC CALL MTH MTHSATAN2 
0 cD 13 MAC JSB MTH MTHSATAN_R4 
8 C i$ ; MODULE: MTHSDACOS 
8 3 18 MTH MTHSDACOS 
C 519 OLDENTRY iaeereee R9 ; Release 1 name 
8 7 2 » MAC JSB MTHSDACOS.. R7 
0 4 5 § ; MODULE :MTHSDASIN 
02D : MA ALL MTH MTHSDASIN 
0208 4 OLDENTRY HTHSDASIN RO 3; Release 1 name $ 
8 43 2 2 MAC JSB MTH MTHSDASIN_ R7 
02E 2 7 ; MODULE: MTHSDATAN 
E 8 MAC CALL MTH MTHSDATAN 
E 9 MAC CALL MTH MTHSDATAN2 
: » MAC JSB MTH MTHSDATAN_R7 
F ¢ 3; MODULE :MTHSDEXP 
F CALL MTH THSDEXP 
0 $ OLDENTRY RTHSDEXP- R7 ; Obsolete name 
0 5 MAC JSB ATHSDEXP_ R6 
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P] 
5 


MAC CALL MTH 0619 
MAC JSB MTH nTHsoLogI R8 
MAC JSB MTH MTHSDLOG_RB 

; MODULE :MTHSOSINCOS 
MAC CALL 


D 
MAC JSB MTH on 
D 


—=90 


MAC CALL MTH MTHS 


| 
0 
3 | 
5 R | 
§ MAC JSB MTH MTHS _R7 
§ ; MODULE :MTHSDSQRT 

0 MAC CALL MTH MTHSDSORT 

1 MAC JSB MTH MTHSDSORT_RS 
j ; MODULE :MTHSEXP 

4 MAC CALL MTH MTHSEXP 

5 MAC Js6 MTH MTHSEXP_R4 
8 ; MODULE :MTHSSINCOS 
8 MAC CAL MTHSCOS 

9 JSB MTH MTHSCOS_R4 

0 MAC CALL MTH MTHSSIN™ 

1 MAC JSB MTH MTHSSIN_RS 

§ ; MODULE: MTHS$SQRT 

4 MAC CALL MTH MTHSSQRT 

‘ 3 JSB to MTH$SQRT_R3 is with new entries. 

8 
9 


; MODULE :MTHSSQRTR2 (obsolete module) 
MAC JSB MTH MTH$SQRT_R2 


Oooo 
WAI AA AINA AAAI AIA AAI AAAI A NAAN ANNAN 


OOOO OD WO NINA AAD MII & EE Wrororeor 


WDOOCOCCMOMMdOMOCMdMO@ Oo 


CGOCCOCOOCOCOCOCOOCOCOOCOCoCoOoO 
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; Language independent support entry points 
Include them after frequently used math routines, since 
they have the power routines. 


; MODULE :OTSS$DIVC 
MAC CALL OTS OTS$DIVC 


MODULE :OTSSLINKAGE 
MAC SYM 


OTS OTSSLINKAGE 
; MODULE :OTSSMSGDEF 

MAC SYM OTS OTS$_FATINTERR 
MAC SYM OTS OTS$~INPCONERR 
MAC SYM OTS OTS$~INTDATCO 
MAC SYM OTS OTS$~INVSTRDES 
MAC SYM OTS OTS$-10_CONCLO 
MAC 5M OTS OTS$~OUTCONERR 
MAC SYM OTS OTS$~USEFLORES 
MAC SYM OTS OTS$~WRONUMA 


MODULE :OTSSPOWCJ 
MAC CALL OTS OTSS$POWCJ 


MODULE :OTSS$POWDD 
MAC CA 


OO>r>rrrrrrrrrrrrrrr rr PoOoOooooowvown 


SWOWDODODOWDMDOOCOCHOMWOCOMWMDOOOCDODBAODOOOCOCOCOCCCCOCOCCCOCOCOC@@modcacc cc. 


PDRDQRQDQPQPLQLPPP PPP APP DPE DP DPD DPE DEDEDE DED DP DED. PPV PVPS SSIS VS ISIS IOSIOSIOSIOSIO 
POPIPOPIPOPINIIS) 2 9 * | 2QOOCOCOCOCOCOCOCOC CO OOOO COO OWDWOWOOOOOOo YY 
NOONE WR OW NOAUE WIN 0 OD NAME WIN 9 OD NA UE WIN 0 OD NOU EW OOO NOUS Ur 


BPR EES FAWN AAA AANA AWA NNIAIWI WWW ANI AAI AIAN AINA AAI AAAAAAAS 


0 
0 
8 
0 LL ots OTSSPOWDD 
0 MAC CALL OTS OTSSPOWDR 
0 : MAC CALL = OTS OTSS$POWRD 
03¢ ; MODULE :OTS$POWDJ 
0 C MAC CALL OTS OTS$POWDJ 
03¢ ; MODULE :OTS$POWII 
0 C MAC CALL OTS OTS$POW!1 
03D ; MODULE :OTSSPOWJJ 
0 p MAC CALL OTS OTS$POWJJ 
6 D ; MODULE :OTS$POWRJ 
03D MAC CALL OTS OTSSPOWRJ 
E ; MODULE :OTSSPOWRR 
E MAC CALL OTS OTSSPOWRR 
E ; MODULE :OTSSSCOPY 
E MAC CALL OTS OTSS$SCOPY_DXDX 
F MAC JSB OTS OTSSSCOPY-DXDX6 
F MAC CALL OTS OTS$SSCOPY-R_DX 
0 MAC JSB OTS OTS$SCOPY-R~DX6 
MAC CALL = OTS OTS$SGET1"DB 
1 MAC JS8 OTS OTSS$SGET1~DD_R6 
1 MAC CALL OTS OTSSSFREET_DD 
MAC JS8 OTS OTSS$SFREE1~DD6 
MAC CALL = OTS OTSSSFREEN”DD 
MAC JSB OTS OTSSSFREENDD6 
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z* 
; Now define the rest of the Math entry points 


; MODULE :MTHSABS 
MAC 


PAA 


4 9 
4 
4 
d 
4 634 NOVECT MTH MTHSABS 
4 635 MAC NOVECT MTH MTHSDABS 
4 6 § MAC NOVECT MTH MTHS$GABS 
4 6 MAC NOVECT MTH MTHSHABS 
4 6 3 MAC NOVECT MTH MTHSIIABS 
r e272 MAC NOVECT MTH MTHSJIABS 
4 ge ; MODULE: ER THSAINT 
oe $46 NOVECT MTH MTHSAINT 
4 644 ; MODULE: ;RTHSAROD 
. o62 MAC NOVECT MTH MTHSAMOD 
4 e$ ; MODULE: EATHSANINT 
s 98 MAC NOVECT MTH MTHSANINT 
04 650 ; MODULE: MTHSBITOPS 
04 651 MAC NOVECT MTH MTHSIIAND 
4 634 MAC NOVECT MTH ITHSIIEOR 
438 65 MAC NOVECT MTH WSITOR 
o% : 638 MAC NOVECT MTH BTHSIISHE 
04 636 MAC NOVECT MTH MTHSINOT 
Oe 65 MAC NOVECT MTH MTHS$JIAND 
04 658 MAC NOVECT MTH MTHSJIEOR 
O* 68 MAC NOVECT MTH MTHSJIOR 
6 661 MAC NOVECT MTH MTHSJISHFT 
oe 66¢ MAC NOVECT MTH MTHSJNOT 
rt 664 ; MODULE: MTHSCABS 
$3 969 MAC CALL MTH MTHSCABS 
44 667 ; MODULE: MTHSCEXP 
‘6 96 MAC CALL MTH MTHSCEXP 
4 670 ; MODULE :TNSCLOS 
rf er) CALL MTH MTHSCLOG 
4 $76 ; MODULE: ERTHSCONJG 
° ors MAC NOVECT MTH MTHSCONJG 
& 676 3 MODULE :MTHSCONVER 
4 67 MAC NOVECT MTH MTHSAIMAG 
8 MAC NOVECT MTH MTHSDIMAG 
7 MAC NOVECT MTH MTHSGIMAG 
0 MAC NOVECT MTH THSC 
681 MAC NOVECT MTH MTHSDCMPLX 
6 ¢ MAC NOVECT MTH MTHSGCMPLX 
° MAC NOVECT MTH nTHSDBL 
4 MAC NOVECT MTH MTHSGDBLE 
685 MAC NOVECT MITH MTHSDFLOTI 


Wo 
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MTHSSNGLG 
MTHSCOSH 
MTHSCSQRT 
MTHSDCOSH 

D 

D 

I 

J 
MTHSDINT 


ee ee ee ee 
ee 
ZEEFETEIEISEITETSESEIEIES 


MTH 
MTH 
MTH 


NOVECT MTH 
NOVECT MTH 
NOVECT MTH 
NOVECT MTH 


NOVECT MTH 
: MODULE :MTHSCOSH 
MAC 
CALL 
MAC CALL 
; MODULE :MTHSDIM 
MAC NOVECT MTH 
MAC 
MAC 
MAC 
; MODULE :MTHSDINT 
MAC 


CALL 
3 MODULE :MTHSDCOSH 


3 MODULE :MTHSCSINCOS 


; MODULE :MTHSCSQRT 
MAC 
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3; MODULE: MTHSDMAX1 
MAC NOVECT MTH MTHSDMAX1 
: MODULE :MTHSDMIN1 
MAC NOVECT MTH MTHSDMIN1 
3 MODULE: MTHSDMOD 
MAC NOVECT MTH MTHSDMOD 
3; MODULE :MTHSDNINT 
MAC NOVECT MTH MTHSDNINT 
3 MODULE: MTHSDPROD 
MAC NOVECT MTH MTHSDPROD 
; MODULE :MTHSOSIGN 
MAC NOVECT MTH MTHSDSIGN 


0 
: 
Q 
0 
0 
0 
0 
Q 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 


MODULE :MTHSDSINH 
MAC CALL MTH MTHSDSINH 


MODULE :MTHSDTAN 
MAC CALL MTH MTHSDTAN 


MODULE : MTHSDTANH 
MAC CALL 


MTH MTHSDTANH 


; MODULE: MTHSIIDNNT 

MAC NOVECT MTH MTHS$IIDNNT 
; MODULE :MTHSIISIGN 

MAC NOVECT MTH MTHSIISIGN 


3 MODULE :MTHSIMAXO 
MAC NOVECT MTH MTHSAIMAXO 
MAC NOVECT MTH MTHSIMAXO 


3 MODULE :MTHSIMINO 
MAC NOVECT MTH MTHSAIMINO 
MAC NOVECT MTH MTHSIMINO 


AAA ADA AA AAMT UT UU ES BP BS BP AINA AIAN 
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SSSI SSS SSE eee 


? 
71 ; MODULE :MTHSININT 
4 MAC NOVECT MTH MTHSININT 
74 ; MODULE: MTHSJIDNNT 
4 MAC NOVECT MTH MTHSJIDNNT 
77 ; MODULE :MTHSJISIGN 
4 MAC NOVECT MTH MTHSJISIGN 
80 ; MODULE :MTHSJMAXO 
MAC NOVECT MTH MTHSAJMAX0 
MAC NOVECT MTH MTHSJMAXO 
; MODULE: MTHSJMINO 
& MAC NOVECT MTH MTHSAJMINO 


De ee el et a a a a ae 
ee Se 


ODOOCOCOCOOO0O0O0OO0O0O0OWMCCD 


AUF WN OODONAUEWN — O COONAOU SW —OOONIO 
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SOSSOOSOOOOOCOCO 
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POWDDODD0D0D0000 
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- Define entry vectors for VMSRTL 


MAC NOVECT 
MODULE : MTHSJNINT 
MAC NOVECT 
MODULE :MTHSMAX1 
MAC NOVE 
MAC NOV 
MAC NOV 
MODULE :MTHSMIN1 
MAC NOVE 
MAC NOVE 
MAC NOVE 
MODULE : MTHSMOD 
MAC NOV 
MAC NOV 
MODULE : MTHSMSGDEF 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 


MODULE : MTHSRANDOM 
MAC CALL 


OPUS Tes ee 


MAC NOVECT 


; MODULE :MTHSSINH 
MAC C 


MODULE :MTHSTAN 
MAC 


CT 
ECT 
ECT 


ALL 


CALL 
; MODULE :MTHSTANH 
MAC 


CALL 


LLL LL LL LL LL LL LL 


SEP=1986 Vii4b:04 EYMSHTL. SR 


MTHSJMINO 
MTHSJNINT 


MTHSAMAX1 
MTHSIMAX1 
MTHSJMAX1 


MTHSIMOD 
MTHSJMOD 


MTH$_SIGLOSMAT 


MTH$_SQUROONEG 
MTHS 


MTHS URONUMARG 
MTHSRANDOM 
MTHSSIGN 
MTHSSINH 
MTHSTAN 


MTHSTANH 
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MODULE :LIBSEXTZV 
MAC CALL LIB LIBSEXTZV 


MODULE :LIBSFFC 
MAC CALL LIB LIBSFFC 


MODULE :LIBSFFS 
MAC CALL LIB LIBSFFS 


; MODULE:LIBSFIXUP_FLT 
MAC CACL 


LIB LIBSFIXUP_FLT 


4B 5 3¢ 
rb : 3 General Library entry points LIBS 
48 $ 
48 
48 5 : MODULE:LIBSAST_IN_PROG 
2 7 MAC CALC LIB LIBSAST_IN_PROG 
048 41 ; MODULE:LIBSCHAR 
Ree rk: MAC NOVECT LIB LIBSCHAR 
4B 44 ; MODULE:LIBSCRC 
rt $2 MAC CALL LIB LIBSCRC 
rh, 23 ; MODULE :LIBSCRC_TABLE 
pee rf MAC CALL LIB LIBSCRC_TABLE 
04C Hh : MODULE:LIBSCVTOF 
04C 33] MAC NOVECT LIB LIBSCVTDF 
04C 26 
04¢8 = =85 
pace 854 ; MODULE:LIBSDEC_OVER 
pace 832 MAC CALL LIB LIBSDEC_OVER 
04D0 637 : MODULE :LIBSESTABLISH 
04D0 58 MAC CALL LIB LIBSESTABLISH 
Beee 859 * 
04D 860 ; MODULE:LIBSEXTV 
861 MAC CALL LIB LIBSEXTV 
s0¢ 
6 
64 
Fi 
$9 
68 
+4 
0 
q 
* 
74 
75 
7 


3 MODULE :LIBSFLT_UNDER 
MAC ALL 


C 
; MODULE :LIBSGET_INPUT 

MAC CALL LIB Ll 
MAC CALL LIB LI 


; MODULE :LIBSICHAR 
MAC NOVECT LIB LIBSICHAR 


; MODULE :LIBSINDEX 
MAC CALL 


LIB LIBSFLT_UNDER 


LIB LIBSINDEX 


PUPVPVPVPV PUPPIES BB EPP 
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; MODULE :LIBSINITIALIZE 
MAC NOVECT 


0 LIB LIBSINITIALIZE 
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- Define entry vectors for VMSRTL 


MODULE: LIBSINSV 
MAC CALL 


MODULE :LIBSINT OVER 
MAC CALL 


MODULE :LIBSLEN 


MAC NOVECT 


MODULE :LIBSLOCC 
MAC CAL 


MODULE :LIBSLOOKUP_KEY 
MAC NOVECT 
MODULE :LIBSMATCHC 
MAC CALL 
MODULE: LIBSMATCH COND 
MAC CACL L 
MODULE :LIBSMOVTC 
MAC CALL 


MODULE :LIBSMOVTUC 
MAC CALL 


; MODULE :LIBSMSGDEF 
MA SYM 


C 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYA 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
MAC SYM 
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LIB 


LIB 


LIB 


LIB 


th a 0 ah he SO, hh a GL a, 
— Pt ae nt ame bs — ee Ot be Oe be bo Os Bs be bs $e Be 
o2ow 2OOOD F2ZO2OD WWWOD9299202000M0 


LIBSINSV 
LIBSINT_OVER 
LIBSLEN 
LIBSLOCC 
LIBSLOOKUP_KEY 
LIBSMATCHC 
LIBSMATCH_COND 
LIBSMOVTC 


LIBSMOVTUC 


“USEF Cones 
~WRON 


Cee PETES CECE Ferrer rrererereere 
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5 947 3 MODULE: jL1BSPuT OUTPUT 
? $3 CAL LI LIBSPUT_OUTPUT 
6 366 ; MODULE :LIBSREVERT 
26 a MAC CALL L1B LIBSREVERT 
56 32 MODULE :LIBSSCANC 
2 936 MAC CALL LIB LIBSSCANC 
57 936 ; MODULE :LIBSSCOPY 
570 «695 MAC CALL LIB LIBSSCOPY_DXDx 
2 938 MAC JSB LIB LIBSSCOPY-DXDX6 
8 5 MAC CALL LIB LIBS$SCOPY-R_DX | 
0588 960 MAC JSB LIB LIBSSCOPY-R-DX6 j 
0590 961 MAC CALL LIB LIB$SGET1—D5 
59 96¢ MAC JSB LIB LIBSSGET1-DD_R6 
05A0 (96 MAC CALL LIB LIBSSFREET_DD 
OSAB 964 MAC © JSB_Ss«‘LBSCs«CNLUBSSFREE1~DDOG / 
05SB0 965 MAC CALL LIB LIBSSFREEN_DD 
0588 966 MAC JSB L1B LIBSSFREEN_DD6 
05c0 496 
05CO0 968 ; MODULE:LIBSSTAT_VM 
05C0 969 MAC CALL LIB LIBSSTAT_VM 
05¢8 970 
098 971 ; MODULE:LIBSSIGNAL 
05¢ 97¢ MAC CALL LIB LIBSSIGNAL 
9900 97 MAC CALL LIB LIBSSTOP 
05D 974 
0908 975 ; MODULE:LIB$SIG_TO_RET 
5D 976 
0508 97 MAC CALL LIB LIB$SIG_TO_RET 
0S5EO 6978 
05EO0 979 ; MODULE:LIBSSKPC 
HH: 980 MAC CALL LIB LIBSSKPC 
OE 982 ; MODULE :LIBSSPANC 
SE 98 MAC CALL L1B LIBSSPANC 
O5F 984 
>t 985 ; MODULE :LIBSSYS ASCTIM 
>t 3 § MAC NOVECT LIB LIBSSYS_ASCTIM 
O5F 9 g 3 MODULE: iL lBssys FAO 
Bor 4 RNOVECT LIB LIBSSYS_FAO 
Ser 39 3 MODULE: ;L1Bssys FAQL | 
af 99¢ NOVE L1B LIBSSYS_FAOL 
SF 994 ; MODULE:LIBSSYS_GETMSG 
af 999 MAC NOVECT LIB LIBSSYS_GETMSG 
SF 997 ; MODULE:LIBSSYS_TRNLOG 
i 4 MAC NOVECT LIB LIBSSYS_TRNLOG 
2 1 9 : MODULE :LIBSVM 
FO 1 MAC CALL L1B LIBSER EVM 
5F8 1 ; MAC CALL = LIB LIBSGET_0M 
600 1 
| 


3 da 
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WOOULE +) JSSSTAT vA 
MAC CALL LIB 


MODULE: LY noes 9! 
MAC NOVECT LIB 


MODULE: gL iesolery SEP 
MAC NOVECT LIB 


MODULE :  taenteg * POINT 
MAC NOVECT LIB 


MODULE : EL esr PROGRAM 
NOvVECT LIB 


MODULE : EL 18800, COMMAND 
MAC “NOVECT LIB 


; MODULE: i eer 
MAC NOVE 


cT LIB 
MAC NOVECT LIB 

MODULE : ELIGSTRA ASC_EBC 
Novett LIB 


MODULE ;LIBSTRA EBC_ASC 
MAC Novett Ll 


MODULE : LS mae 
MAC NOVECT LIB 


MODULE : LS tema 
MAC NOVECT LIB 


MODULE : ammo 
MAC NOVECT LIB 


MODULE : ph eeners 
NOVECT LIB 


1984 02:15:59 VAX/VMS Macro V04-00 P 1 
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LIBSSHOW_VM 
LIBSCURRENCY 
LIBSDIGIT_SEP 
LIBSRADIX_POINT 
LIBSRUN_PROGRAM 
L1IB$DO_COMMAND 


GET_COMMON 
PUT— COMMON 


AM 


LIBSTRA_ASC_EBC 
LIBSTRA_EBC_ASC 
LIBSINSQHI 
LIBSINSQTI 
LIBSREMQH! 


LIBSREMOQTI 


—————EEe 


re 
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Internal entry points which need yegters ae the non-shared 
ibrary must call these procedures in shared | sp rary Be ane 

than getting a copy of the procedure from the o Jec brary. 

Note: the instances of $$ entry vectors is se ge m castaed 

The only cases where it hurts ‘fe have two copies of a procedure 

is when the procedure has statically allocated (OWN) data 

which is used as a process-y de resource. 

Note: in order to prevent Linker fete, Sruncetion rere : modules 

which are shared and are also Linked in as pri vere copies when 

$$entry points are referenced by non-shared routines called by the user 

must declare external references to code as general (not word displacement) 

even if the reference is to the same PSECT!!!!! 

Modules which have this dual Life are: FORSSERROR, FORSSVM, FORSSSIGNAL. 

POPP PSTTT TOT IT TT TCT TTT TIT TTT TTT TTT TTT TTT TET TTT TTT TTT TTT TTT 

MAINTENANCE NOTE: The following $$ entry vectors can not have their 

specs chan *¢ even though $$, since that would cause user programs 

with compati biLity (unshared) routines to have to re-Link in order to 

work correctly. Worse we would not want to increase the major ID in 

order for the image activator to catch the incompatibility, since 

that would cause all users to have to relink. 


; MODULE :FORSSCB 
MAC JS F FORS$CB_PUSH 
MAC JSB FOR FORS$$CB_POP 


RET 
MAC JSB FOR FORS$CB_GET : Added for non-shared code 
3; to load CCB from OTSSSA. CUR_LUB 


: MODULE : FORSERRSNS ; See also above FORSERRSNS, FORSERRSNS_W 
MAC CALL FOR FORSSERRSNS_SAV 


SOOCGOOCOCOOCOOCOOCOOCOCOOOOCOOOOOOOOOOOOOoOO 
PARAEXARAAAAAAAAAAA AAA AAA AA AAPA A AAA A AO 
WNMNMNNININ | “DOC COCOOCOCODBDOOOOOOCOOoO 


©0909 090909 O09 © 00 09 6d 09 00 C0 Cd G9 09 09 CD C9 Cd 00 00.09 09 C9 CD C9 CD CD C200 0D 


ae a a ts — ss a a se ss 2 5 se tt 


OCOOCCCCOCCOCOCOCOOOOOCOOoOooO 


NAMES WIN O OD NAU EWN O OOO NAME WW" OO ONOU 


SIN SISSIES SSID AAA AA AAA AMM & & 
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6 1080 ;+ 

6 1081 ; Here starts all new entry points defined after VMS 1.00. 
? 1 § : Unless a FUTURE above can be replaced, all new transfer 
é ! z 3 points MUST be appended to the end of this List 

1085 ° 

6 1 § MAC CALL FOR FORS$SIO_DC_V ; by ref above 
63 MAC CALL = FOR FORS$IO-GC-V 

64 1 § ; MODULE FORSCVTRT 

640 1090 MAC CALL FOR FORSCVT_G_TD 

64 1 3 MAC CALL FOR FORSCVT_G_TE 

50 1 MAC CALL FOR FORSCVT_G_TF 

o2 : a MAC CALL FOR FORSCVT_G_TG 

660 1095 ; MODULE OTSSCVTTR 
dees ! 36 MAC CALL OTs OTSSCVT_T_G 
066 1098 ; MODULE FORSCVTRT 
0668 1099 MAC CALL FORSCVT_H_TD 
9670 1100 MAC CALL = FOR FORSCVT_H_TE 
0678 1101 MAC CALL = FOR FORSCVT_H_TF 
pose 1186 MAC CALL FORSCVT_H_TG 
set) 1108 ; MODULE OTSSCVTTR 
pene 1182 MAC CALL OTS OTSSCVT_T_H 
0690 1109 ; MODULE OTSSCVTLT - Old "tts sivrit et under FORS 
0690 1108 MAC CALL OTs TI 
0698 1109 MAC CALL OTs TLT9 
06A0 1110 MAC CALL OTS OT Sse a if 
pene i] MAC CALL OTS OTSSCVT_L_T 
0680 1448 3 MODULE FORSENTRY continued from above 
0680 1114 MAC CALL FOR FORSREWRITE_SF FORSSIO_BEG 
0688 1115 MAC CALL FOR FORSREWRITE_SO FORS$$I0_BEG 
bere 1338 MAC CALL FOR FORSREWRITE_SU FORSSIO_BEG 
06Cc8 111 MAC CALL FOR FORSREAD_IF FORS$IO_BEG 
C6D 1113 MAC CALL FOR FORSREAD_I0 FORS$IO_BEG 
06D8 111 MAC CALL FOR FORSWRITE_IF FORS$10_BEG 
Dee 1 , MAC CALL FOR FORSWRITE- 10 FORS$$10_BEG 
6E8 11 § 3; MODULE FORSDELETE 

6E 11 MAC CALL FOR FORSDELETE 

of 1) 3 MAC CALL FOR FORSDELETE_D 

6FB 11 § 3: MODULE FORSINQUIRE 

of i MAC CALL FOR, FORSINQUIRE 

7 11 § 3; MODULE FORSUNLOCK ; 

, 1 ? MAC CALL FOR FORSUNLOCK 

7 11 § 3: MODULE FORSENTRY continued 

20 1 ; MAC CALL —sFOR FORSREAD_KU FORS$I0_BEG 
710 11355 ; MODULE FORSLEX 

710 1136 MAC NOVECT FOR FORSLGE 
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MAC NOVECT FOR FORSLGT 
MAC NOVECT FOR FORSLLE 
MAC NOVECT FOR FORSLLT 
; MODULE akponne 
MAC NOVECT LIB LIBSADDX 
MAC NOVECT LIB LIBSSUBX 


NODULE LIBSASN.UTH MBX 
ROVECT LIB — LIBSASN_WTH_MBX 


MODULE LIBSDAY 
MAC NOVECT LIB LIBSDAY 


MODULE gh J OnERCES 
MAC NOVECT LIB LIBSEMODF 


MODULE a JUSERCES 
MAC NOVECT LIB LIBSEMODD 


MODULE ab JOSERODS 
MAC NOVECT LIB LIBSEMODG 


MODULE gh sesencEn 
MAC NOVECT LIB LIBSEMODH 


mS LIBSEMULATE 
MAC NOVECT LIB LIBSEMULATE 


MODULE a OSES TENS 
MAC NOVECT LIB LIBSESTEMU 


MODULE # edd FOREIGN 
NOVECT LIB LIBSGET_FOREIGN 


MODULE A peas 
MAC NOVECT LIB LIBSPOLYF 


MODULE B) apactna 
MAC NOVECT LIB LIBSPOLYD 


MODULE ab sOSPOL TS 
MAC NOVECT LIB LIBSPOLYG 


MODULE ah JOSraL ie 
NOVECT LIB LIBSPOLYH 


MODULE Mada Mh 
NOVECT LIB LIBSSIM_TRAP 


; MODULE LIBSTIMER 
MAC NOVECT LIB LIBSINIT_TIMER 
MAC NOVECT LIB LIBSSHOW_TIMER 
MAC NOVECT LIB LIBSSTAT_TIMER 
MAC NOVECT LIB LIBSFREE_TIMER 


a te te he ee ee ee ee i 
ee ee ee ee eB a ek dd dd 
SOOOOCOCOOOCOOCOOCOOCOCOCSCOCOCOCOCOOCOCOCSOSSOCOSCOCOCOCOCOOCOOCOCOOOOCOOOOOOOOOOOOO 
ee ee a ee ee ee dd 
ee ee ee ee a a ee a ee ee a ea a a a a 
OOO O00 0909.09 09 0900 09 0909 SI ISI SN NSD DDD DDD ODD TUTTI BBS BS EE 
BPS OOO NAUE WN 0 ODNA UNE WIN 9 OO NAME WI 0 OO NAEP SO OONOAU ES UO OO~I 


SOOOOCOOCOCOOOOOOCOOCOCOOCOCOCOCOC OOOO OCO SOOO OOCOCOOOOOOCOOCOOOO OOOO OOO OOOO 


; MODULE MTHSAINT 


i rs 


ARERR EEE EE PAA AAAI POPINININONNONN) 2 SS OOOO OOOO OD OOOO 


SOOOOOOCOCOSOOCOCOCOCOCOOOCOOCOOCOOOOCOOOSOSOOOOCOCOOCOCOOOOOO OOO OOO OOOOOOOO 
a i Be i te i Bt tb te i ee 
a a a ee ee a ee ee ae ee a ee ee a a me ee ee a a 
2.0909090900 00 00 0d 09 G9 00 G9 Gd Cd Gd Cd 09 CO Cd CD CD C9 0d C9 C0 C9 09 C9 CD CO CO COV CO OO WM OODOOOOCODOOCOCOOCOOOCO0O0O 
a a ee ee eh dd dd od 


DOD NA AEN SO OD NA UNE WIN OS OOO NA UNE WIN  S OD NOAM EW OOD NOUS UO OONOUNSE 
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MAC NOVECT 
; MODULE BY Saad + 
MAC OVECT 
MAC NOVECT 
MODULE ane = - 
MAC NOVECT 
MAC NOVECT 
; MODULE MTHSDIM 
MAC 


NOVECT 
MAC NOVECT 


; MODULE Ds eae 


MAC NOVECT 
MODULE <n 
MAC JSB 
; MODULE Bs alge 
MAC NOVECT 
MAC NOVECT 


MODULE Sate 


NOVECT 

MAC NOVECT 
MODULE A ater 

MAC NOVECT 


MAC NOVECT 
MODULE aay 


NOVECT 

MODULE © epee ~~ 

MAC NOVECT 
MODULE MTHSGEXP 

MAC NOVECT 
MAC NOVECT 

MODULE BY eee" 
MAC NOVECT 


MAC NOVECT 
MODULE Os eaamey 

MAC NOVECT 

MAC NOVEC 


MODULE + eee! 
NOVECT 


MODULE Beery 
NOVECT 


MODULE MTHSGMOD 


"8 


MTH 


MTH 
MTH 


MTH 
MTH 


MTH 
MTH 


MTH 
MTH 


MTH 
MTH 


MTH 
MTH 


MTH 
MTH 


MTH 
MTH 


NTH 
MTH 


MTH 
MTH 


MTH 
MTH 


MTH 


MTH 


P1986 11:48:04 


MTHSAINT_R2 


MTHSCVT_D_G 
MTHSCVT_G_D 


MTHSDFLOOR 
MTHSDFLOOR_R3 


MTHSGDIM 
MTHSHDIM 


MTHSDINT_R4 
MTHSDTAN_R7 


MTHSFLOOR 
MTHSFLOOR_R1 


MIHSGACOS 
MTHSGACOS_R7 


MTHSGASIN 
MTHSGASIN,R7 


MTHSGATANH 
MTH$GCOSH 


MTHSGEXP 
MTHSGEXP_R6 


MTHSGFLOOR 
MTHSGFLOOR_R3 


MTHSGINT 
MTHSGINT_R4 


MTHSGMAX1 


MTHSGMIN1 


cro V04-00 P 
REIV VMSVECTOR.MAR; 1 
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~SEP=1 
MAC —-NOVECT =—MTH = MTHSGMOD 


; MODULE ae 
NOVECT MTH MTHSGNINT 


MODULE BY analy 


OVECT MTH MTHSGPROD 


MODULE A Saema 
MAC NOVECT MTH MTHS$GSIGN 


MODULE an Hoes ineOs 
MAC NOVE 


CT MTH MTHSGSIN 

CT MTH MTHSGCOS 
MAC NOVECT MTH MTHSGSIN_R7 
MAC NOVECT MTH MTH$GCOS_R7 


MODULE ee 
NOVECT MTH MTHSGSINH 


MODULE BH scam 
MAC NOVECT MTH MTHSGSQRT 
MAC NOVECT MTH MTHSGSQRT_RS5 


MODULE Ds eacie- 
MAC NOVECT MTH MTHSGTA 
MAC NOVECT MTH MTHSGTAN. R7 


3 MODULE © eetag 
MAC NOVECT MTH MTHSGTANH 


; MODULE MTHSHACOS 
MAC NOVECT MTH MTHSHACOS 
MAC NOVECT MTH MTHSHACOS_R8 


: MODULE Ds erga 
NOVECT MTH MTHSHASIN 
MAC NOVESCT MTH MTHSHASIN_R8 


MODULE ee 
MAC NOVECT MTH MTHSHCOSH 


MODULE WTHSHEXP 
MAC NOVECT MTH MTHSHEXP 
MAC NOVECT MTH MTHSHEXP_R6 


MODULE OS puseatys - 
MAC NOVECT MITH MTHSHFLOOR 
MAC NOVECT MTH MTHSHF LOOR_R7 


MODULE, MTHSHINT 
NOVECT MTH MTHSHINT 
MAC NOVECT MTH MTHSHINT_R8 
MODULE MTHSHMAX 
MAC NOVECT MTH MTHSHMAX1 


MODULE MTHSHMIN1 


OWONAUNE WN 9 ODN: NEW O OONOU Et 
z==z 
Pe 
o 
22 
oO 
<< 
m 


Se te ee te ee 
ee ee ee ee ee a a a ee a a a a ad dd 


SOOOOOOOOOO0 OOOO OO O09 69 69 69.09 09 09 09 09 SII NSN NNN NPP AA AAA AAA MINIT 


NAME AN @O OONAU EWN 0 O@NOU SW —O 


a aa a ka 8 a a et a a a st as a ss ss Ss 20 2 1 1 


SOOOOOOOOCOCOCOOCOCOOCOCOCOCOCCOCOOCOOCOCOCOCOCCOCOCOCOCOOCOOOOOOOOCOOOOOOOOOOOO 
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MAC NOVECT MTH MTHSHMIN1 


; MODULE ee 
MAC NOVECT MTH MTHSHMOD 


MODULE ane 
NOVECT MTH MTHSHNINT 


MODULE BS aaaatg 9 


OVECT MTH MTHSHSIGN 
MODULE BY eaaataie 8 
MAC NOVECT MTH MTHSHSIN 
MAC NOVECT MTH MTHSHSIN_RS 
CT MTHSHCOS” 
CT MTH MTHSHCOS_RS 


MAC NOVE 


MODULE sama 
MAC NOVECT MTH MTHSHSINH 


MODULE + ag | 
MAC OVECT MTH MTHSHSQRT 
MAC NOVECT MTH MTHSHSQRT_R8 
MODULE oe 
MAC NOVECT MTH MTHSHTAN 
MAC NOVECT MTH MTHSHTAN_RS 


; MODULE Os ening 
MAC NOVECT MTH MTHSHTANH 


MODULE By aay 
MAC NOVECT MTH MTH$IIGNNT 


MODULE Be cae 
MAC NOVECT MTH MTH$IJHNNT 


MODULE MTHSJIGNNT 
MAC NOVECT MTH MTHSJIGNNT 


MODULE MTHSJIHNNT 
NOVECT MTH = MTHSJIHNNT 
| 


MODULE MTHS$TAN 
MAC JSB MTH MTHSTAN_R4 


MODULE MTHSSGN 
MAC NOVECT MTH MTHSSGN 
MAC NOVECT MTH MTHS$SGN_R1 


MODULE ahs Seroues 
NOVECT OTS OTSS$SPOWGG 


MODULE OTSSPOWGJ 
MAC NOVECT OTS OTSSPOWGJ 


MODULE OTSS$POWHJ 


Sayin Din tn. Dn Jin niin itn, Sit, Din i i Bi Ni Bi i tt BD tt te te te i i i i | 


FIED IID IIIA III III) at st st rt i hh 


SOOGOOOCOOOOCOOO 9696960 69 69 69 G9 Cd 09 C9 CD C9 C9 CS CD C9 Cd Cd 09 0D Cd CD 0D C9 CD 0D 09 09 09 G0 C9 CD. 09 CD CD CD CD CD CD CD CD ODOD OD 


ec ec ce ec ce ce ee ee ce ee ee ee ee ce me ee ee ee ec ee ee ee a ed dd od dd ed od od 


AOAAA MINIMUM BS BB BE BEE BS EWA 


FAD 9 ODN NE WIR 9 OD NAME WIN 0 ODNAU EWN 0 OONAUS WN" OOONO US Wh" O00 
> 


SOOO OCOOOCOOOOOCOCOCOCOOOOCO OOOO OOOOOOOOOOOOOOOOOOOOO 
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és MAC NOVECT OTS OTSSPOWHJ_R3 


5 ; MODULE DNS 
MAC NOVECT OTS OTSSDIVCD_R3 


MODULE nee eS 
MAC NOVECT OTS OTSSDIVCG_R3 


MODULE MS aeag 
NOVECT OTS OTSSMULCD_R3 


MODULE BS tea, 
NOVECT OTS OTSSMULCG_R3 


MODULE Rs aaa + 
NOVECT MTH MTHSCDABS : 


MODULE © aomatage” 
MAC NOVECT MTH MTHSDCONJG 


MODULE aor rene 
MAC NOVECT MTH MTHSCDEXP 


MODULE Batata 
MAC NOVECT MTH MTHSCDLOG 

MODULE MTHSCDSINCOS 
MAC NOVECT MTH MTHSCDCOS 
MAC NOVECT MTH MTHSCDSIN 


MODULE © aearcag 
MAC NOVECT MTH MTHSCDSQRT 


MODULE A eat 
MAC NOVECT MTH MTHSCGABS 


MODULE ne 
MAC NOVECT MTH MTHSGCONJG 


MODULE ny nee 
MAC NOVECT MTH MTHSCGEXP 


MODULE Bs ana 
NOVECT MTH MTHSCGLOG 


MODULE MTHSCGSINCOS 
MAC NOVECT MTH MTHSCGC 
MAC NOVECT MTH MTHSCGS 


MODULE gus eceres® 
NOVECT MTH MTHSCGSQiT 


MODULE ng ssrouce 
MAC NOVECT OTS OTSSPOWCC 


MODULE OTSSPOWCDCD 
MAC NOVECT OTS OTSSPOWCDCD_R3 


ee Be ee ee ee Se ee 


50090909 09 09 09 09 09 09098 SI NI NINN NNO OO 


OOO NAUES WD @§ OOO NAUE WIN SO OD NAU EWN O OD NAU EW 0 OONAUES WN OOM 


So i in Site Dita itn Dit Jit itn tn Pit Dit itn itn it itn Din itn itn i Pitan i Din Dit Dit i itn it Sit it itn it itn Pin Din Dit itn Dit Din itn Sit itn itn itn itn Dit itn Site Jit Jin it Site ite Dit itn Dit Sie J 


PIPSRIMIPIMINIMININPININPIPIPNININIPYDIPY|IPINIPININPY|PINPPINIPIPIPINIPIPIPUNIPINIPUPPUNYD 


SOOCOSOCOCOOSOSOC OOOO COCO SOS OOOSCOSCOCOOOCCOOCOCOOOCOOOOOOOOOOOOO 


ee ee et a a et ss = 9 — 9 — 8 — — 3 2 ) 2 = a 1s ss 4 ) 2 2 tt 


SOOOOCOCOCOOOOCOCOCOOCOCOCOCOCOCO OOOO COOOCOCOOOOOOOOOOOOCOOOO 
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MODULE ae ae 
MAC OVECT OTS OTSS$POWCDJ_R3 


MODULE a ee 
MAC NOVECT OTS OTSS$POWCGCG_R3 


MODULE ha = 
MAC NOVECT OTS OTSSPOWCGJ_R3 


MODULE OTSSPOWHH 
MAC NOVECT OTS OTS$POWHH_R3 


3 MODULE MTH$SQRT 
MAC JSB MTH MTHSSQRT_R3 


the following routine is called from FORSSERROR, therefore 
_it must be vectored. 


DADA AAA Ee BS BS EB WINN AAI OPONOPNONOND 


14 
14 § , 
1424 
1258 ; 
1632 
14 os 
1450 
1431 
7 14 gi 
7 14 
1434 
7 1435 
07 14 § 
07 14 
07 1438 
0728 1439 
0728 1440 
Ssh ee) 
o758 14 ¢. MODULE DS sree (continued) 
$7¢8 1? ¢ MAC CALL FOR FORSSFP_MATCH 
0730 14 § ; MODULE FORSREAD_SN 
1! 12 3 MAC CALL FOR FORSREAD_SN FORS$$10_BEG 
0738 1449 ; MODULE FORSWRITE_SN 
Bie 1 ? MAC CACL FOR FORSWRITE_SN FOR$$10_BEG 
0740 14 § ; MODULE FORSIO_ELEM (continued) 
0740 14 MAC CALL FOR FORS$IO_X_SB 
0748 1454 MAC CALL FOR FORS$IO_X_NL 
0790 14 3 MAC CALL FOR FORSIO-X~SE 
0758 1457 ; MODULE OTSSCVTLT (continued) 
828 1° 3 MAC CALL OTS OTSSCVT_L_TB 
0760 1460 ; MODULE OTSSCVTTOL (continued) 
0760 1461 MAC CALL = OTS OTS$SCVT_TB_L 
et 1288 3 MODULE OTSSCVTTF 
0768 1464 MAC CALL OTS OTSSCVT_T_F 
pre 1298 ; MODULE LIBSATTACH 
oy 178 MAC CALL LIB LIBSATTACH 
778 1469 ; MODULE LIBSSPAWN 
44 1009 MAC CALL LIB LIBSSPAWN 
7 § 1006 ; MODULE LIBSGET_OPCODE 
, 16%? MAC CALL LIB LIBSGET_OPCODE 
7 1475 ; MODULE FORSRAB 
7 1208 MAC CALL FOR FORSRAB 
7 147 
790 1478 ;+ 


YapRyec ron 
4-00 


00000000 ' GF 
00000000 ' GF 
00000000 ' GF 


0000' 


ee ee i | 


DOWOrrrrrrr rrr roOwovunonowowowowono 


17 
00 
17 
00 
17 


CGOOCGCOCOOCCOCCOCCOOOCOCOCOSOOCOOCOOOO 
OF OVOCY BOMOMDOMOMOOCcCOMOMMDBOOOOOOO 


SSN NNN 


ow 


— 8 = 2 8 2 2 1 8 
rata tall et oe ee ee oe et oe et ee ee ot ot oe to et ee ee 


LLL LLL LLL LLL LL LL ttt 
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Ay Pay9RG $fiabioc 


3; The fol 
3 convers 


; MODULE OTSSS$CVTDT 
MAC JSB 


; MODULE OTSSSCVTRT 
MAC JSB 


fe 
3; The followin 
; to these sym 


AX/VMS Macro V04-00 
VMSRTL.SRCJVMSVECTOR.MAR; 1 


points are for the ‘‘kernel"’ floating output 
ough they are ‘‘double-dollar’’ names, they are 
: vectored so that future language-specific shareable images can use them. 


Owing three ent 


OTS$SCVT_D_T_RB 


so that there will be references 
Without them, the Linker complains. 

; Note that these entries are not universal, so they cannot be referenced 
; by those Linking to this image. 


entries are present onl 
ls in this module. 


G*BASSSHANDLER 


G*FORS$TO_BEG 


Ss tt 


SN NNO 
RNHMDOOOMOOOMOOOOM 
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EP=1984 11:48:04 


Leave some expansion room for FOR, OTS and MTH by 
room is exhausted they w 


lL have to go after 
Give an error message if the space gets 


F_GREATER <<,-RTLSSTART>=*X800> 
or <<, -RTLSSTART>=*X800> 


0£512-<<.-RTLSSTART>&511>] 


; Negative vector pad space 
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VMSSVECTOR 16-SEP-1984 15:59 VAX/VMS Macro V04-00 Page 32 
4-003 aes 0F lbibe LUMSRTL. SREJUMSVECTOR MARS 1 . 33) 
1517 ; 
1 13 ; The following entry points are for the string Library. 
| 8 ; The JSB entry points are Later. 
00 1521 MAC CALL STR STRSCONCAT ; Concatenate strings 
08 15 § MAC CALL STR STRSCOPY_DX 3; Copy by descriptor 
4H 15 MAC CALL STR STRSCOPY_R :; Copy by reference 
18 1524 MAC CALL STR sTRSEnecT Dx ; Free a string 
820 12 5 MAC CALL STR STRSGET1_Bx ; Allocate a string 
8 1 § MAC NOVECT STR STRSADD ; Add two strings 
8 15 MAC NOVECT STR STRSMUL r Gul ciely two strings 
8 iF 8 MAC NOVECT STR STRSRECIP 3; Take 1/ a string 
8 1 MAC NOVECT STR STRSROUND ; Arithmeticly round a strin 
08 1530 MAC CALL STR STRSLEFT ; Take left part of string 
0830 133) MAC NOVECT STR STRSLEFT_R8 ; (JSB entry point) 
0830 15 § MAC CALL STR STRSLEN_EXTR ; Extract from a string by lL 
0838 153 MAC NOVECT STR STRSLEN_EXTR_R8B ; (JSB entry point) 
0838 1534 MAC CALL STR STRSPOS_EXTR ; Extract from a string by p 
0840 1535 MAC NOVECT STR STRSPOS_EXTR_R8 ; (JSB entry point) 
0840 1536 MAC CALL STR STRSPOSITION ; 
0848 1537 MAC NOVECT STR STRSPOSITION_R6 3; (JSB entry point) 
0848 1538 MAC CALL STR STRSRIGHT : Take be ie part of a strin 
0850 1539 MAC NOVECT STR STRSRIGHT_R8 3; (JSB entry point) 
0850 1540 MAC CALL STR STRSDUPL_CHAR ; Make lots of a character 
0858 1541 MAC CALL STR $TRIM ; Remove trailing blanks 
0860 1366 MAC FUTURE STR STRSFUTURE_1 ; Reserved for future expans 
pase 154 MAC FUTURE STR Hb A 
0870 1544 MAC FUTURE STR STRSFUTURE_ 
0878 1545 ;:+ | p 
0878 1546 ; String condition codes 
0878 1547 ;- 
0878 1548 MAC SYM SIR STRS$_DIVBY_ZER ; Divide by zero 
0878 1549 MAC SYM STR STRS_FATINTERR ; Fatal internal error 
0878 1550 MAC SYM STR STRS_ILLSTRCLA ; Illegal string class 
pB78 1551 MAC SYM STR STR$_ILLSTRPOS 
0878 1236 MAC SYM STR STRS$_ILLSTRSPE 
0878 155 MAC SYM STR STRS_INSVIRMEM 
0878 1554 MAC SYM STR STRS_MATCH 
0878 1555 MAC SYM STR STR$_NEGSTRLEN 
0878 1556 MAC SYM STR STR$_NOMATCH 
0878 1557 MAC SYM STR STR$_NORMAL 
0878 1558 MAC SYM STR STRS_STRIS_INT 
0878 1559 MAC SYM STR STR$_STRTOOLON 
0878 1560 MAC SYM STR STRS$_TRU 
87 1561 MAC SYM STR STRS$_WRONUMARG 
0878 1562 
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16-SEP 
6-SEP 


1986 


Tf dB :b0 


7 1385 3+ 
78 1565 ; The following entry points are generated b 
if ! 96 3; compiler. The current orrangensnt of which 
78 1 98 ; 
} $2 3 ARITHMETIC CODE SUPPORT 
78 1571 MAC NOVECT BAS BAS$POWII 
7 13/6 MAC JSB BAS BASSSCALE_D_R1 
rt 157 MAC NOVECT BAS BASS$POWJJ 
1574 MAC JSB BAS BASSDSCALE_D_R1 
; 1575 MAC NUVECT BAS BASS$POWRJ 
1 og MAC NOVECT BAS BASSPOWRR 
0 157 MAC NOVECT BAS BASS$POWDJ 
0 1378 MAC NOVECT BAS BASS$POWD 
08 157 MAC NOVECT BAS SSRND_F 
be 1580 MAC NOVECT BAS BASSRANDOMIZE 
888 1581 MAC CALL BAS BASSCMPF _APP 
+94 1386 MAC CALL BAS BASSCMPD_APP 
$898 138% 3 STRING CODE SUPPORT 
0898 1585 ; 
0898 1586 MAC NOVECT BAS BASSCHANGE _NA_S 
0898 1587 MAC NOVECT BAS BASSCHANGE_S_NA 


AX/VMS Macr 
VMSRTL.SRCJVMSVECTOR.MAR; 1 


o V04-00 P 3 
age G 


7) 4- 


the BASIC=-PLUS-2 
are vectored is tenative. 


Integer(w) ** Integer (w) 
Scale a number 

Long ** Long 

Descale a number 

Float ** Long 

Float ** Float 

Double ** Lon 

Double ** Double 

Return random number 
Perturb the random seed 
Approximate float compare 
Approximate double compar 


CHANGE A% to A$ 
CHANGE A$ to A% 


E 106 
- Define entry vectors for VMSRTL 


9 
9 
9 
9 
A 
A 
8 
8 
B 
88 
: 
et 
D 
8D 
8E 
ge 
F 
8F 
90 
90 
90 
90 
91 
91 


STRING FUNCTIONS 


WDOWDOCOWOWOWOWODBOMMOOOMOc ccd 


a kkk a kk ak kd a td 
MEW =O ODONOAUE WIN OOONAOUESWNO”O 


Q 
Q 
Q 
Q 
0 
i] 
0 
0 
0 
0 
0 
0 
0 


Bee Se Ge Se Fe Se Se Fe Fe BeBe Fe Fe Ge Fe Fe Fe Fe Se Se Fe Se Se 


——------4 


v04-00 Page 34 
RESumSvECTOR.MaR:1 °° (48) 


ela move, right justif 
Byece one ee nt 


Double FORMAT 
oars 1 


RADIA & 

STOP statement (*** here 
Return binary=>ASCII numb 
Ditto for double 

Ditto for Longwo rd 

Return binary OSASCII numb 
Ditto for « ae 

Ditto for i. ord 

Return binary2>ASC11 numb 
Ditto for double 

Ditto for longword 

Tab over x spaces 

24 hour time string 
Return ASCII=->binary stri 
Ditto for floating 

Ditto for double 
Translate a string 


F 10 
VMSSVECTOR - Define entry vectors for VMSRTL 16-SEP-1984 7:15:59 VAX/VMS M v04-0 P 5 
art ' grSEp 1984 Siiabsoe LUMSRTE SaeIUMMGECSOR.MAR:1 2% (7a) 


918 1617; 

4 1918 ; STRING ARITHMETIC 

918 1620 MAC NOVECT BAS BASSCOMP 3 wiley arith compare 

918 1621 MAC NOVECT BAS BASSDIF : S.A. difference 

918 16 ¢ MAC NOVECT BAS BASSPLACE 3; §$.A. precision 

918 16 MAC NOVECT BAS BASS$PROD ; $.A. multiplication 

918 1624 MAC NOVECT BAS BAS$QU0 i §$.A. division 

4 1 5 MAC NOVECT BAS BASSSUM ; S.A. addition 
19 ? : PROCEDURE ACTIVATION 

918 1629 MAC JSB BAS BASSINIT_R8 : Main program initializer 
83 0 1630 MAC JSB BAS BASSINIT_DEF_R8 : DEF function initializer 
928 1631 MAC JSB AS BASSINIT_DFS_R8 ; DEF* function initializer 
8 : 16 ¢ MAC ALL Ss BASSINIT_GOSOB :; GOSUB initializer 

938 163 MAC NOVECT BAS BASSINIT_C_GSB ; ON-GOSUB initializer 
0938 1634 MAC JSB AS ASSEND_R8 ; Main program ender 

0940 1635 MAC JSB BAS ASSEND_DEF_R8 : DEF function end 

0948 1636 MAC JSB BAS BASSEND_DFS_R8 3: DEF* function end 

b32e 1637 MAC JSB BAS BASSEND_GSB_R8 ; GOSUB end 

$338 1838 3 ERROR HANDLING 

0958 1640 ; 

0958 1641 MAC CALL BAS BASSON_ERR_2Z ; ON ERROR GOTO 0 

0960 1646 MAC CALL BAS BASSON_ERR_BK ; ON ERROR GOBACK 

0968 164 MAC CALL BAS BASSRESUME : ESUME Line num 

0970 1644 MAC CALL BAS BASSRESUME _Z ; RESUME 

0978 1645 MAC CALL BAS BASSERR ; ERR variable 

0980 1646 MAC CALL BAS BASSERL ; ERL variable 
0988 1647 MAC CALL BAS BASSERN ; ERNS$ variable 
344 1968 MAC CALL BAS BASSERT ; ERTS variable 
0998 1650 MAC CALL BAS BASSHANDLER BASSSHANDLER 


i >< a 
-00 


G1 
- Define entry vectors for VMSRTL 


16-SEP-1984 :15:59 
-SEP=-1984 HY f 

9A 1638 : 

HN 1 73 Scalar (non matrix) 1/0 

9A 1685 MAC CALL BAS BASSINPUT 

9A 16 § MAC CALL BAS BASSLINPUT 

980 165 MAC CALL BAS BASSINPUT_LINE 
9B 1658 MAC CALL BAS BASSR 1 

Te 1659 MAC CALL BAS BASSPRINT 

9C 1660 MAC CALL BAS BASSPRINT_USING 
900 1661 MAC CALL BAS BAS$IO_END 

09D 1996 MAC CALL BAS BASSIN_W_R 

ee 166 MAC CALL BAS BASSIN_L_R 

9E 1664 MAC CALL BAS BASSIN_F_R 
Ore 1665 MAC CALL BAS BASSIN_D_R 

OOF 1998 MAC CALL BAS BASSIN_T_DX 
QA00 166 MAC CALL BAS BASSOUT_C_V_S 
OA0B 1668 MAC CALL _— BAS ASSOUT“L-V~B 
yt 1997 MAC CALL BAS BASSOUT_L_V_C 
OA1 1670 MAC CALL BAS BASSOUT_F_V_S 
0A20 1671 MAC CALL = BAS BASSOUT-F-V-B 
0A28 1676 MAC CALL = BAS BASSOUT—F-V~C 
OA : 167 MAC CALL BAS BASSOUT_D_V_S 
0A3 1674 MAC CALL BAS BASSOUT_D_V_B 
0A40 1675 MAC CALL = BAS BASSOUT-D-V-C 
0A48 1676 MAC CALL BAS BASSOUT_T_D&_S 
OA5O 167 MAC CALL BAS BASSOUT_T_DX_8 
OAS8 1678 MAC CALL BAS BASSOUT_ * _DxX_C 
OA60 1679 ; 
QOA60 1680 : Matrix 1/0 
OA60 1681 ; 
0A60 1o8¢ MAC NOVECT BAS BASSOUT_MAT_S 
QA60 168 MAC NOVECT BAS BASSOUT- MAT “B 
A60 1684 MAC NOVECT BAS BASSOUT-MAT_ im 
A60 1685 MAC NOVECT BAS BASSIN_PAT 
QA60 1686 MAC CALL BAS BASSHAT. PRINT 
OA68 1687 MAC CALL BAS BASSMAT_INPUT 
OA7 1688 MAC CALL BAS BASSMAT_LINPUT 
OA7 1689 MAC CALL BAS BAS T_READ 
QOA80 1690 MAC NOVECT BAS BASS 
QOA80 1691 MAC NOVECT BAS BASSNUM2 

0A80 1098 

A 1695 ; 

A 1694 ; RMS 1/0 

A 1695 ; 

A 1999 MAC CALL BAS BASSOPEN 

A 169 MAC CALL BAS BASSCLOSE 

AS 1998 MAC CALL BAS BASSGET 

AY 199 MAC CALL BAS BASSGET_RECORD 
AA 1 9 MAC CALL BAS BASSGET_KEY 

AA 17 MAC CALL BAS BAS 

AB 17 § MAC CALL BAS BASSPUT_RECORD 
AB 17 MAC CALL BAS BASSPUT_ T 
AC 1704 MAC CALL BAS BAsseyt REC_CNT 
ACB 1705 MAC CALL BAS BASSF IND 

AD 17 § MAC CALL BAS BAS ie RECORD 
AD 17 MAC CALL BAS BASSF I KEY 

AE 1708 MAC CALL BAS BASSDEETE 


AX/VMS Mac 
VMSRTL.SR 


v04-00 Pp 
RE Sums VMSVECTOR.MAR; 1 — (38) 4- 


or es unit 
unit 
LINE unit 


USING 
ist 


string 
lLong(word) ; 
Long(word) 
Long(word) ° 


for MAT PRINT 


for MAT READ 
NUM var (mat) 
NUM2 var (mat) 


OPEN (all) 


PuT 
Sequential a w/ COUNT 
Random PUT w/COUNT 
Sequential F IND 
Random FIND 

Indexed FIND 

DELETE 


H 1 
- Define entry vectors for VMSRTL . 


BSE =1986 P9882 


S$RESTORE_KEY 
S$SCRATCH 


AOOOOON 


ro V04-00 P 7 
SOmSvECTOR.MAR:1 2% (3p) 
eeate 

eet w/COUNT 

Indexed RESTORE 

SCRATCH 


I 10 
- Define entry vectors for VMSRTL Yo 


SLPSPSHOHSSSSOSH SSO OSS OOOS 


PPP R LPR E PRL LEE 


SD i i i i DD i i ee te te te te ee ie ee ee ee ee ee 


PIII ES BS BS BS BE BB WWIII WIAA III 


a kk kk tt 
DAE WN OOD NA NESW 0 OD NAME WN O OD NOUE Wi" OOO 


RSTS/E COMPATIBILTY 


MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MISC 

MAC CALL BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC CALL BAS 
MAC CALL BAS 
MAC CALL BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC CALL BAS 
MOVE STATEMENT 

MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 
MAC NOVECT BAS 


SEp-1986 {1:4 


8 
BAS 


A 
BASSBUFSIZ 


BASSMOVE _T 
BASSMOVE- -FROM 
BASSMOVE—END 
BASSMOVE— ARRAY 


AX/VMS fr: 
VMSRTL.SR 


cro v04-00 


Page 38 
CJVMSVECTOR.MAR; 1 . 3 


1) 


OMMMem 


string scan 
info 


CCPOS func 
Enable echo 
Reeeeeeee 
Disable echo 
Disable CTRL O 
Cause control 0 


NAME AS statement 
KILL erase 
BUFSIZ func 


Start a MOVE TO statement 
Start a MOVE FROM statemen 
End of a MOVE statement 
MOVE an array 


00 
00 
00 
OC 
OC 
0c 
00 
0c 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 


or dal - Define entry vectors for VMSRTL” i" os tb Oe] ‘ 2? AX/VMS Macro Vv04-00 Page 


“SEP=1 VMSRTL.SR RCIVMSVECTOR.MAR; 1 (33) 


MATRIX Arithmetic 


Sete te 


Matrix scalar multiplicat 
Matrix transposition 


MAC NOVECT BAS BASSDET_F ; Determinate 
MAC NOVECT BAS BASSDET_D i; Determinate 
8 MAC NOVECT BAS BASSMAT_NULL ; Null out 4 an eeres 
B MAC NOVECT BAS BASSMAT_ASSIGN 3; Matrix assign 
MAC NOVECT BAS BASSMAT_INIT ; Matrix init at ize 0 or 1) 
MAC NOVECT BAS BASSMAT_IDN ; Matrix identity 
MAC VECT BAS BAS ADD 3; Matrix addition 
B MAC NOVECT BAS BASSMAT_SUB ; Matrix subtraction 
MAC NOVECT BAS BAS MUL ; Matrix multiplication 
MAC NOVECT BAS BASSMAT_SCA_MUL : 
AS ; 


PUPP PVPS BS BB BB PEEP PLE EE EEE 


0 
0 
j 


a a a kk a ht 

Ba in Si Bi Diy Sit Bt Bi Dy i i | 

80.0009 09 09 09 69 08 09 09 09 SI NINN NNN IPA A AAA AAOOrn 

—OODNA UE WP $C OOO NAMES W OO ONOUE Uv O00 
7 


OB MAC NOVECT BAS BASSMAT_INV Matrix inversion 
$8 MAC NOVECT BAS BASSMAT_REDIM Single redimension 
08 : CODE SUPPORT 
08 ; MAC CALL BAS BASSCHR : Return character for bina 
0B : VIRTUAL ARRAYS 
0B F MAC NOVECT BAS BASSFET_FA_W_R8 : Fetch a word from virtual 
0B MAC NOVECT BAS BASSFET FALL RS 
08 MAC NOVECT BAS BASSFET-FA_F_R 
OB MAC NOVECT BAS BASSFET FA-D-RB 
MAC NOVECT BAS ASSFETCH BFA 
08 MAC NOVECT BAS BASSSTO_FA_W_R8 ; Store a word in a virtual 
0B C NOVECT BAS STO-FA_L_R8 
0B MAC NOVECT BAS BASS$STO_FA_F_R8 
0B MAC NOVECT BAS BAS$STO-FA-D-R8 
0B MAC NOVECT BAS BASSSTORE GFA 
0B MAC NOVECT BAS BAS$STO_FA_RDX 


K 10 
+ Nhl - Define entry vectors for VMSRTL abs ae 0F 13382 


8 1793 ; 

8 4 : : FIELD STATEMENT 

B50 17 5 - MAC NOVECT BAS BASSFIELD_SET 

B50 17 MAC NOVECT BAS BASSE IELD~COPy 
17 : MAC NOVECT BAS BASSFIELD-CLEAR 

B50 179 MAC NOVECT BAS BASSF ELD“ PURGE 

B50 1 00 MAC NOVECT BAS BASSE IELD_OPEN 
Ot MAC NOVECT BAS BASSF IELD-CLOSE 

8) ; MISC 

oes 1805 ° MAC NOVECT BAS BASSDATE_T 

B50 1 : MAC CALL _—sBAS SSERRO 

0858 180 MAC NOVECT LIB LIBSDATE_TIME 

0858 1 08 MAC NOVECT BAS BASSMARGIN 

08> 09 MAC NOVECT BAS BASSNOMARGIN 

083 ! 1 : LIBSTPARSE and its subroutines 

085 1818 ; MAC CALL LIB LIBSTPARSE 

0B60 1814 MAC NOVECT LIB LIBSCVT_DTB 

0B60 1815 MAC NOVECT LIB LIBSCVT-HT 

0B60 1816 MAC NOVECT LIB LIBSCVT~OTB 


i aie 


AX/VMS Macro V04-00 Page 4 ve 
VMSRTL.SRCIVMSVECTOR.MAR; 1 (23) 4- 
Set u ar 
C var 
lded attribu 


Return an ASCII string w/ 
Signal errors from compil 
System standard date/time 
MARGIN sta/MARZ funct 
NOMARGIN statement 


+ alae - Define entry vectors for VMSRTLS es as tat 9 HEH A bry Mac 


o V04- 
SEP= 


r 4-00 Page 
VMSRTL.SRCJVMSVECTOR.MAR; 1 


B60 1818 ; 

3 } 18 ; Entry points used by the BASIC compiler to support the RUN command. 

B60 1821 ° MAC NOVECT BAS BASSRUN_INIT ; Initialize for RUN 
+H 1 ¢ MAC CALL BAS BASSPUSA_ERR 3; Save error status 

B68 1 MAC CALL BAS BAS$POP_ERR ; Restore error status 
0B70 1824 MAC NOVECT BAS BASSINIT_IOL ; Start immediate code 


a ++, 


M10 
VMSSVECTOR - Define entry vectors for VMSRTL 16-SEP=1 AX/ re cro V04-00 Page 4 
arti -SEP-1 1388 oF] 74 32 UMSRT L.S REV VMSVECTOR.MAR; 1 ° (25) 

B7 3 
B7 : Internal BASIC ont ey oints that are likely to need to be vectored 
ef ; because routines unlikely to be vectored call them. 
B7 MAC JSB BAS pasesce. POP 
B7 MAC JSB BAS BAS$$CB_PUSH 
Hy MAC JSB BAS BASSS$CB_GET 
B MAC CALL BAS BASSSERR_INIT 
0B9 MAC CALL BAS BASSSOPER ZERO 
B9 MAC CALL BAS BASSS$RECOO_INIT 
BA MAC CALL BAS BASSSBLNK_CINE 
BA MAC CALL BAS BAS3331 GNAL 
BB MAC CALL BAS S$SSIGNAL_IO 
088 MAC CALL BAS BASSSSTATU_INIT 
OBC MAC CALL BAS ASS$$STOP 
OBC MAC CALL BAS ASS$S$STOP_IO 
0BD MAC CALL BAS BASSCANTYPANEAD 
OBD MAC JSB BAS BASSSSCALE_ 
OBE MAC JSB BAS BASSSSCALE Ry 
0B MAC CALL BAS BASS$$STOP 

MAC CALL BAS BASSSFORMAT_INT 

MAC CALL BAS BASS$ K 

MAC CALL BAS BAS C 


U 
MAC CALL BAS BASSSUDF _WL1 
JSB entry points to the string routines. 


DODWODWOHOCOCCOCOCCPDODBODOVBOVDOOCOCSCHDOVWOVBODODOWDOWDODODBDODOOCOO 
a a ee td a ad dd dd dd dd = dd 
0.09 0009.09 0000 09 Gd Cd Co Cd 00 09 OD 09 Cd OD C9 OO CD GD OD Gd CD Cd Od OD CD GD Cd GD Cd CO CD Cd CO C9. CD C9 00 C9 CO CD CO CD CD COCDCD 
SISSIES DS DS OS DDS DDS DDS TT BB EE EWI III rononorp 
MEWIN (OOO NAUE WN O ODO NAULS WN O OO NAME WN O OONAU ES WH OOOnNO 


E 
OBF 
OBF 
0cOo 
0CcO 
0C1 
0C1 
0C1 
0C1 MAC JSB STR STRSCOPY_DX_R8 
0Cc1 MAC JSB STR STRSCOPY_R_R8 
0c MAC JSB STR STRSDUPL CRARRS 
0c MAC JSB STR sTReeReet 
0c MAC JSB STR STRSGET1_Bx_R4 
0c3 MAC JSB STR STRSLEFT 
0C4 MAC JSB STR STRSLEN_EXTR_R 
0C4 MAC JSB STR STRSPOSTTION RS 
0cs MAC JSB STR STRSPOS_EXTR_R8 
ac? MAC JSB STR STRSRIGAT RB” 
0C6 3; More STRS$ ng | points. These modules must be in the sharable 
0C6 ; library, even though they are not used much, because they use 
Bee : string interlocks. 
0C6 MAC CALL STR STRSAPPEND 
c¢ MAC CALL STR STRSCOMPAR 
C MAC CALL STR MLS Ta EQL 
C7 MAC CALL STR STRSPREF IX 
0c8 MAC CALL STR STRSREPLACE 
0c8 MAC JSB STR STRSREPLACE_R8 
3 MAC CALL STR STRSTRANSLATE 
C9 MAC CALL STR STRSUPCASE 


——————L 
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VMSSVECTOR - Define entry vectors for VMSRTL 16-SEP-1984 :15:59 VAX/VMS Macro V04-00 Page 43 
art . SrSEp lobe MTiaksoe LOMSN TE ReSomeceC oon mans1 Pee ($2, 

CAO 1877 ; 

+A | 4 ; The BASIC error codes. First the small integer symbols. 

CAO 1880 MAC SYM BAS BASSK_ACCDEVUSE 

CAO 1881 MAC SYM BAS BASSK_ARGDONMAT 

CAO 1 j MAC SYM BAS BAS$K_ARGOUTBOU 

CAO 188 MAC SYM BAS AS$K-ARGTOOLAR 

CA 138% MAC SYM BAS B “ARR A 

CAO 1885 MAC SYM BAS BAS$K_ARRMUSSQU 
OCAd 1386 MAC SYM BAS BASS$K_-BADDIRDEV 

CAO 1887 MAC SYM BAS S$K-BADLINNUM oC 
BCA 1388 MAC SYM BAS BASS$K_BADNUMPRI OC 

CAO 1 MAC SYM BAS BASS$K_BADRECIDE OC 
OCAO 1890 MAC SYM BAS BASS$K_BADRECVAL OC 
OCAO 1891 MAC SYM BAS BASSK_CANCHAARR oC 
OCA 189¢ MAC SYM BAS BASSK_CANCOMSTA OC 

CAO 189 MAC SYM BAS BAS$K—CANCON OC 
OCAO 1894 MAC SYM BAS BASS$K_CANF INF IL OC 
OCAO 1895 MAC SYM BAS BAS$K_CANINVMAT OC 
OCAO 1896 MAC SYM BAS BASS$K—CANOPEF IL OC 
OCAO 1897 MAC SYM BAS BASS$K_ CANPOSEOF oC 
OCAd 1898 MAC SYM BAS BAS$K_CHATO_NON 00 

CAO 1899 MAC YM BAS BAS$K_CORFICSTR oc 
OCAO 1900 MAC SYM BAS BASSK_DATFORERR 00 
OCAO 1901 MAC SYM BAS BASSK_DATTYPERR 00 
OCAO 1908 MAC SYM BAS BAS$K_DEF WI TFNE 00 
OCAO 190 MAC SYM BAS BASS$K_DEVHUNWRI 00 
OCAO 1904 MAC SYM BAS BASS$K_DEVNOTAVA 00 
OCAO 1905 MAC SYM BAS BASSK_DEVNOTF IL 00 
OCAO 1906 MAC SYM BAS BASS$K_DIFUSELON 00 
OCAO 1907 MAC SYM BAS BAS$K_DIRERR 00 
OCAO 1908 MAC SYM BAS BASS$K_DISBLOINT 00 
OCAO 1909 MAC SYM BAS BAS$K_DISERRDUR 00 
OCAO 1910 MAC SYM BAS BAS$K_DISPACLOC 00 
OCAO 1911 MAC SYM BAS BAS$K_DISPACNEE 00 
OCAO 1316 MAC SYM BAS BASSK_DISPACNOT 00 
OCAO 191 MAC SYM BAS BASS$K_DISPACPRI 00 
OCAO 1914 MAC SYM BAS BASSK_DIVBY_ZER 00 
OCAO 1915 MAC SYM BAS BASS$K_DUPKEYDET 00 
CCAO 1916 MAC SYM BAS BAS$K_ENDF ILDEV 00 
OcadQ 1917 MAC SYM BAS BASS$K_ERRTRANEE 00 
OCAO 1918 MAC SYM BAS BASSK_ENDOF _STA 00 
OCAO 1919 MAC SYM BAS BASSK “ENEONCFIL 00 
OCAd 1920 MAC SYM BAS BASS$K_EXPERR st 

CAO 1921 MAC SYM BAS BASS$K—EXPTOOCOM 
OCAO 19 é MAC SYM BAS ASSK~FATDISPAC 00 
BCAG 19 MAC SYM BAS BASS$K-FATSYSIO 00 
OCAO 1924 MAC SYM BAS BAS$K_F IEQVEBUF 00 

CA 1925 MAC SYM BAS BASSK—FILACPFAI 

CAO 1926 MAC SYM BAS BASS$K_FILATTNOT 

CAO 1927 MAC SYM BAS BASSK_F ILEXIREN 
OCAO 1928 MAC SYM BAS BASSK_FILEXPDAT 00 

CAO 1929 MAC SYM BAS BASS$K-FILIS_ LOC 4 

CAO 1930 MAC SYM BAS BAS$K—F IRARGSEQ 

CAO 1931 MAC SYM BAS S$K"FLOOVE 00 

CA 19 é MAC SYM BAS BASSK"FLOPOIERR 00 

CAO 193 MAC SYM BAS ASSK~FLOUND 00 


AS$K 
MAC SYM BAS BASS RTILLUSADEV 
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VMSS$VECTOR - Define entry vectors for VMSRTL 16-SEP-1984 02:15:59 VAX/VMS Macro v04-00 Page 44 vm 
Part . ates 1 4: 13: :04 LUMSRTL. SREJVMSVECTOR.MAR: 1 ° (26) 4- 
CAO 1934 MAC SYM BAS BAS$K_ FNEWITDEF 00 
CAO 1935 MAC SYM BAS BASS$K_FNEWITFUN 00 
CAO 19 $ MAC SYM BAS BAS$K_F ORWI TNEX 00 
CAO 19 MAC SYM BAS BASS$K_ILLALLCLA 00 
CAO 19 : MAC SYM BAS BASS$K_ILLARGLOG 88 
CAO 19 MAC SYM BAS BAS$K_ILLBYTCOU 
CAO 1940 MAC SYM BAS BAS$K_ILLCLUSIZ 00 
CAO 1941 MAC SYM BAS BAS$K_ILLCONCLA 00 
CA 194¢ MAC SYM BAS BASSK~ILLDEFNES 00 
CA 194 MAC SYM BAS AS$K_ILLDUMVAR 00 
CAO 1944 MAC SYM BAS BASS$K_ILLEXIDEF 00 
CA 1945 MAC SYM BAS BAS$K_ILLEXP 88 
CAO 1946 MAC SYM BAS BAS$K_ILLFIEVAR 
CAO 1947 MAC SYM BAS BASSK_ILLFILNAM 00 
CAO 1948 MAC SYM BAS BASSK_ILLFN_RED 00 
CAO 1949 MAC SYM BAS BASS$K_ILLFURNAM 00 
CAO 1950 MAC SYM BAS BASSK_ILLIF_STA 00 
CAO 1951 MAC SYM BAS BASSK_ILLILCACC 00 
CAO 1938 MAC SYM BAS BASSK_ILLIN_IMM 00 
CAO 195 MAC SYM BAS BASSK_ILLIO-CHA 00 
CAO 1954 MAC SYM BAS ASSK_ILLKEVATT 00 
CAO 1955 MAC SYM BAS ASSK_~ILLLINNUM 00 
CAO 1956 MAC SYM BAS BASSK-ILLMAGUSA 00 
CAD 1957 MAC SYM BAS BASSK_ILLMODMIX 00 
CAO 1958 MAC SYM BAS BAS$K_ILLNUM 00 
CAO 1959 MAC SYM BAS ASSK~ILL 00 
CAO 1960 MAC SYM BAS BASS$K_ILLOPE 00 
CAO 1961 MAC SYM BAS BASS$K_ILLRECACC 00 
CAO 1 6¢ MAC SYM BAS BASS$K_ILLRECFIL 00 
CAO 196 MAC SYM BAS BASSK_ILLRECFOR 00 
CAO 1964 MAC SYM BAS BAS$K_ILLRESSUB 00 
CAO 1965 MAC SYM BAS BASSK_ ILLRETS UB 00 
CAO 1966 MAC SYM BAS BAS$K_ILLSTA 00 
CAO 1967 MAC SYM BAS BASSK_ILLSTRIMA 
CAO 1968 MAC SYM BAS BASSK~ ILLSWIUSA 
CAO 1969 MAC SYM BAS BASSK_ILLSYM 
CAO 1970 MAC SYM BAS BASSK ILLSYSUSA 
CAO 1971 K-ILLU 
CAO 1 2 
CAO 197 LLVER 
CAO 1974 
CAO 1975 
CAO 1976 
CAO 1977 
CAO 1978 
CAO 1979 
CAO 1 30 
CAO 1981 
CAO 1 ; 
CAO 1 
CAO 1984 
CA 1985 
CAO 1 $ 
CAO 1 
Cad 1 8 
Cad 1 
CAO 1990 


SOOCOCOCOOOCOOCOCCOOOCOCOCOCOOCOCOOOOCOSCOSOCOOCOCOOOOOOCOOCOOCOO DO 


MAC SYM BAS BASSK~INCFUNUSA 
MAC SYM BAS BAS$K~INCSUBUSE 
MAC SYM BAS BASSK~INDNOTFUL 
MAC SYM BAS BASSK~INDNOTINI 
MAC SYM BAS ASSKINTERR 
MAC SYM BAS BASSK~INTOVEFOR 
MAC SM BAS K-INVFILOPT 
MAC SYM BAS BASSK~INVKEYREF 
MAC SYM BAS BASSK~INVRFAF IE 
MAC SYM BAS BASSK—10_CHAALR 
MAC SYM BAS BASSK~10~CHANOT 
: MAC SYM BAS BASS$K~10-TO_DET 
MAC SYM BAS BASSK KEVF IEBEY 
MAC SYM BAS BASSK~KEYLARTHA 
MAC SYM BAS BASSK~KEYNOTCHA 
MAC SYM BAS BASSK-KEYSIZT00 


ttt ttt sss nee rc 
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VMSSVECTOR - Define entry vectors for VMSRTL 16-SEP-1984 :15:59 VAX/VMS Macro V04-00 Page 
arti . pater OF Ribs LUMSRTL. SREJUMSVECTOR.MAR: 1 ° 
CA 133) MAC SYM BAS BASSK_KEYWAIEXH 
CAO 1 3 MAC SYM BAS BASS$K_LINTOOLON 
CAQ 199 MAC SYM BAS BASSK_LITSTRNEE 
CAO 1994 MAC SYM BAS BASSK_MAGRECLEN 
CAO 1995 MAC SYM BAS ASS$K_MAGSELERR 
CA 1996 MAC SYM BAS BAS$K_MATARRTOO 
8 1997 MAC SYM BAS BASSK_MATARRWIT 
1998 MAC SYM BAS BASSK_MATDIMERR 
0 1999 MAC SYM BA BASSK_MAXMEME XC 
0 2000 MAC SYM BAS BASSK_MEMMANV IO 
0 001 MAC SYM BAS BASSK_MEMPARF AI 
8 Oe MAC SYM BAS BASSK_MISSPEFEA 
0 MAC SYM BAS BASSK— 
0 004 MAC SYM BAS BAS$K_MOVOVEBUF 
0 2005 MAC SYM BAS ASS$K~ NOW 
0 006 MAC SYM BAS BASS$K_NEGFILSTR 
0 007 MAC SYM BAS BASSK_NEXWITFOR 
0 008 MAC SYM BAS BAS$K __NODNAMER 
0 009 MAC SYM BAS Bait ia, ESRU 
0 010 MAC SYM BAS BASSK_NOTENDF IL 
0 011 MAC SYM BAS BASSK_NOTENOAVA 
0 Og MAC SYM BAS BASSK_NOTENODAT 
0 201 MAC SYM BAS BASSK_ 
0 sole MAC SYM BAS BAS$K_NOTRANACC 
0 015 MAC YM BAS BASS$K_NOTVALDEV 
016 MAC SYM BAS BASSK_NO_BUF SPA 
017 MAC SYM BAS BASSK_NO_CURREC 
018 MAC SYM BAS BASSK_NO_FIEIMA 
2019 MAC SYM BAS BASS$K-NO-FIL 
020 MAC YM BAS BASS$K_NO_PRIKEY 
021 MAC SYM BAS BAS$K_NO_ROOUSE 
os¢ MAC SYM BAS Het ey RUNSYS 
02 MAC SYM BAS BASSK 
024 MAC SYM BAS BASSK_NUMIMASTR 
025 MAC SYM BAS BASSK 
2026 MAC SYM BAS BASS$K_ODDADBTRA 
027 MAC SYM BAS AS$K_ONE Two 
028 MAC SYM BAS BASS$K_ON_STANEE 
029 MAC SYM BAS BAS$K_ON_STAOUT 
030 MAC SYM BAS BAS$K_OUTOF DAT 
031 MAC SYM BAS BASS$K_PACIDSDON 
O36 MAC SYM BAS BAS$K_PLEUSERUN 
0 MAC SYM BAS BASS$K IKEYOUT 
40 
] 
028 
44 
i 
049 


Ponce ee Sh, ieee eh a 
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4-003 . ae 7 9F lbioe YUMSRTL. Se SR CoVM VMSVECTOR.MAR; 1 . (26) 4- 
CA rh: : MAC SYM BAS BASSK_REDARR 
CA 4 MAC SYM BAS BASSK_RESINSTRA 
CA 50 MAC SYM BAS BASSK_RESNO_ERR 
CA 51 MAC SYM BAS BASSE RE TWI TG08 
CA 26 MAC SYM BAS BASSK_RRVNOTFUL 
CA 5 MAC SYM BAS BASSK_SCAFACINT 
CA 54 MAC SYM BAS BASS$K_SIZRECINV 
CA 55 MAC SYM BAS BASSK_SP_STAOVE 
Ree B28 MAC SYM BAS BASSK_STANOTFOU 
CA 05 MAC SYM BAS BASSK_STO 
OCA 058 MAC SYM BAS BASS$K_STRIMANUM 
gcae 59 MAC SYM BAS ASS$K_STRIS_NEE 
CA 60 MAC SYM BAS BA ASS$K_ STRTOULON 
QCAO 61 MAC SYM BAS BASSK_ n't 
OCAO 896 MAC SYM BAS BAS$K_SYNERR 
OCAO 206 MAC SYM BAS BASSK_ TAPBOTDET 
OCAO 064 MAC SYM BAS BAS$K_TAPNOTANS 
OCAO 2065 MAC SYM BAS BASSK_TAPRECNOT 
OCA0 B08 MAC SYM BAS BASS$K_TERFORF IL 
OCAO 06 MAC SYM BAS BASSK_TIMLIMEXC 
OCAO 2068 MAC SYM BAS BASSK_TOOF EWARG 
OCAO 2069 MAC SYM BAS BASS$K_TOOMANARG 
OCAO 070 MAC SYM BAS S$K_ MANCP 
OCAO 2071 MAC SYM BAS BASSK_UNDFUNCAL 
OCAO $058 MAC SYM BAS BASSK_USEDATERR 
OCAO soo MAC SYM BAS BASS$K_VIRARRDIS 
OCAO 074 MAC SYM BAS BASS$K_VIRARROPE 
OCAO 2075 MAC SYM BAS BASSK_ VIRBUF TOO 
OCAO 2076 MAC SYM BAS BASSK_ 
OCAO son MAC SYM BAS BASSK_WROMATPAC 
OCAO 2078 ; 
OCAO 2079 ; New messages for Basic 2.0, VMS 3.1 
OCAO 2080 ; 
OCAO 081 MAC SYM BAS BASS$K_NEGZERTAB 
OCAO O86 MAC SYM BAS BAS$K_TOOMUCDAT 
OCAO 208 MAC SYM BAS BASSK_ERRFILCOR 
OCAO 2084 MAC SYM BAS BASSK_UNEF ILDAT 
OCAO 2085 MAC SYM BAS BASS UPFOR 
OCAO 086 MAC SYM BAS S$K- 
OCAO 208 MAC SYM BAS BASS$K_NETOPEREJ 
OCAO 2088 MAC SYM BAS BASS$K_REMOVEBUF 
OCAO 2089 MAC SYM BAS BASSK_UNAREMVAR 
OCAO 2090 MAC SYM BAS BASSK_ MA 
are 091 MAC SYM BAS BASS$K_IMPERRHAN 
CA bas MAC SYM BAS BASSK_ILLRECLOC 
nen 83 MAC SYM BAS BASSK_ CS$12 
CA 94 MAC SYM BAS BASS$K_ TOOLITDAT 
CA 095 
CA 44) 3 
CA 82 : Now the 32-bit values. 
CA 98 ; 
CA 099 MAC SYM BAS BAS$_ACCDEVUSE 
CA 100 MAC SYM BAS AS$_ARGDONMAT 
CA 101 MAC SYM BAS BAS$_ARGOUTBOU 
CA 1 ¢ MAC SYM BAS BAS$_ARGTOOLAR 
CA 1 MAC SYM BAS BAS$_ARRMU 
CA 104 MAC SYM BAS BAS$_ARRMUSSQU 
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rat r yaa 9¢:] :04 (CVMSRTL.SRCIVMSVECTOR.MAR; 1 — (26) 


CAQ 2105 MAC SYM BAS BAS$_BADDIRDEV 
CAD 2106 MAC SYM BAS BAS$~BADLINNUM 
CAO 21 MAC SYM BAS AS$_BADNUMPRI 
CAQ 2108 MAC SYM BAS BAS$~BADRECIDE 
CAO 21 MAC SYM BAS AS$~BADRECVAL 
CAO 2110 MAC SYM BAS AS$~CANCHAAR 
CAO 2111 MAC SYM BAS BAS$~CANCOMSTA 
CAO 2118 MAC SYM BAS BASS_CANC 
CAO 211 MAC SYM BAS BASS~CANF INF IL 
OCAO 2114 MAC SYM BAS BAS$_CANINVMAT 
OCAO 2115 MAC SYM BAS BASS~CANOPEF IL 
OCAd gig MAC SYM BAS BAS$~CANPOSEOF 
CAO 211 MAC YM BAS BASS~CHAT 
OCAO 2118 MAC SYM BAS BAS$_CORFICSTR 
OCAO 2119 MAC SYM BAS BASS$~DATFORERR 
0CA0 120 MAC SYM BAS BASS -DATTYPERR 
CAO 2121 MAC SYM BAS BASS_DEFWITFNE 
DCAD 212¢ MAC SYM BAS BASS_DEVHUNWR 
OCAO 21 MAC SYM BAS BASS_DEVNOTAVA 
OCAO 2124 MAC SYM BAS BASS_DEVNOTF IL 
OCAO 2125 MAC SYM BAS BASS_DIFUSELON 
QCAO 2126 MAC SYM BAS BASS— 
OCAO 2127 MAC SYM BAS BAS$_DISBLOINT 
OCAO 2128 MAC SYM BAS BAS$_DISERRDUR 
OCAO 2129 MAC SYM BAS BAS$_DISPACLOC 
OCAO 2130 MAC SYM BAS BAS$_DISPACNEE 
OCAO 2131 MAC SYM BAS BASS_D1SPACNOT 
OCAD 213¢ MAC SYM BAS BASS_DISPACPRI 
OCAO 213 MAC SYM BAS BAS$_DIVBY ZE 
OCAO 2134 MAC SYM BAS BASS_DUPKEYDET 
OCAO 2135 MAC SYM BAS BASS_ENDF ILDEV 
OCAO 2136 MAC SYM BAS ASS~ENDOF STA 
OCAO 2137 MAC SYM BAS BASS$-ERRTRANEE 
OCA0 138 MAC SYM BAS BASS~EXEONLF IL 
CAO 2139 MAC SYM BAS BASS_EXPERR 
OCAO 2140 MAC SYM BAS AS$~EXPTOOCO 
OCAO 2141 MAC SYM BAS BASS~FATDISPAC 
OCAd 214g MAC SYM BAS AS$~FATSYSIO 
OCAO 214 MAC SYM BAS BASS_F IEOVEBUF 
OCAO 214% MAC SYM BAS BASS_FILACPFAI 
CAO 2145 MAC SYM BAS BASS_FILATTNOT 
CAD 2146 MAC SYM BAS BASS_FILEXIREN 
OCAO 214 MAC SYM BAS BASS_F ILEXPDAT 
OCA 148 MAC SYM BAS AS$-FILIS LOC 
CAO 2149 MAC SYM BAS BASS —F IRARGSEQ 
OCAO 2150 MAC SYM BAS AS$~FLOOVE 
OCAO 2151 MAC SYM BAS AS$~FLOPOIERR 
OCA0 138 MAC SYM BAS AS$~FLOUND 
OCA 1 MAC SYM BAS BASS_FNEWI TDEF 
CAO 2154 MAC SYM BAS BASS_FNEWI TFUN 
CAO 2155 MAC SYM BAS BASS —F ORWI TNEX 
CAD 2196 MAC SYM BAS ASS-ILLALLCLA 
CAO 215 MAC SYM BAS BASS~ILLARGLOG 
CAO 2158 MAC SYM BAS BASS_ILLBYTCOU 
CAO 215 MAC SYM BAS AS$~ILLCLUSIZ 
CAO 2160 MAC SYM BAS BASS~ILLCONCLA 
CAO 2161 MAC SYM BAS BASS_ILLDEFNES 


~ eee ae eee 
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rat . ae 7 9F Bide VMSRTL.SRCIVMSVECTOR.MAR; 1 . (26) 
CA 198 MAC SYM BAS BAS$_ILLDUMVAR 
CA 1 MAC SYM BAS BASS_ILLEXIDEF 
CA 164 MAC SYM BAS BASS_ILLEXP 
CA 165 MAC SYM BAS BASS_ILLFIEVAR 
CA 198 MAC SYM BAS BASS_ILLFILNAM 
CA 16 MAC SYM BAS BASS$_ILLFN_RED 
CA 198 MAC SYM BAS BASS$_ILLFURNAM 
CA 18 MAC SYM BAS BASS_ILLIF_STA 
CA 170 MAC SYM BAS BAS$_ILLILCACC 
CA 171 MAC SYM BAS BASS_ILLIN_IMM 
CA 1% MAC SYM BAS BAS$_ILLIO_CHA 
CA 17 MAC SYM BAS BASS_ILLKEVATT 
CA 174 MAC SYM BAS BASS$_ILLLINNUM 
OCAO 175 MAC SYM BAS BASS_ILLMAGUSA 
are 176 MAC SYM BAS BASS_ILLMODMIX 
CA 177 MAC SYM BAS BAS$_ILLNUM 
OCA 178 MAC SYM BAS BASS_ILLNUMIMA 
OCAO 179 MAC SYM BAS BAS$_ILLOPE 
QCAO 180 MAC SYM BAS BASS_ILLRECACC 
OCAO 2181 MAC SYM BAS BASS_ILLRECFIL 
OCAO 186 MAC SYM BAS BAS$_ILLRECFOR 
OCAO 18 MAC SYM BAS BASS$_ILLRESSUB 
OCAO 184 MAC SYM BAS BASS_ILLRETSUB 
OCAO 185 MAC SYM BAS BASS_ILLSTA 
OCAO 186 MAC SYM BAS BASS_ILLSTRIMA 
OCAO 2187 MAC SYM BAS BASS_ILLSWIUSA 
bcAe 188 MAC SYM BAS BASS_ILLSY 
CAO 189 MAC SYM BAS BASS_ILLSYSUSA 
OCAO 2190 MAC SYM BAS BASS_ILLUSA 
OCAO 191 MAC SYM BAS BASS$_ILLUSADEV 
OCAO 136 MAC SYM BAS BASS_ILLVER 
OCAO 19 MAC SYM BAS BASS$_IMASQUROO 
OCAO 194 MAC SYM BAS BASS$_INCFUNUS 
OCAO 2195 MAC SYM BAS BAS$_INCSUBUS 
OCAO 196 MAC SYM BAS BASS$_INDNOTFUL 
OCAO 197 MAC SYM BAS BASS$_INDNOTINI 
OCAO 198 MAC SYM BAS BASS_INTERR 
OCA 199 MAC SYM BAS BAS$_INTOVEFOR 
aA 00 MAC SYM BAS BASS_INVFILOPT 
CA 01 MAC SYM BAS BASS$_INVKEYREF 
QCA 86 MAC SYM BAS BASS_INVRFAFIE 
Ree MAC SYM BAS BAS$_IO_CHAALR 
CA 4 MAC SYM BAS S$~10~CHANOT 
CA 5 MAC SYM BAS A330 TO_DET 
CA $ MAC SYM BAS BASS_KEYF IEBEY 
CA 8 MAC SYM BAS BASS_KEYLARTHA 
CA 8 MAC SYM CAS BAS$_KEYNOTCHA 
CA 09 MAC SYM BAS BAS$_KEYSIZTOO 
CA 10 MAC SYM BAS BAS$_KEYWAIEXH 
CA 11 MAC SYM BAS BAS$_LINTOOLON 
CA 1 MAC SYM BAS BASS_LITSTRNEE 
CA 1 MAC SYM BAS BASS_MAGRECLEN 
CA 14 MAC SYM BAS S$_MAGSELERR 
CA 15 MAC SYA BAS BAS$_MATARRTOO 
CA 1$ MAC SYM BAS BASS _MATARRWIT 
CA 1 MAC SYA BAS BASS_MATDIMERR 
CA 18 MAC SYM BAS BASS_MAXMEME XC 
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arts " g-3fF -1382 oF: 13; be VMSRTL.SR RCIVM VMSVECTOR.MAR;1 —_ (26) 
CA 4 MAC SYM BAS BASS RE MANY IO 
CA MAC SYM BAS rt ey pets 
CA 1 MAC SYM BAS BASS_MISSPEFEA 
CA § MAC SYM BAS BASS$S_MODERR 
CA MAC SYM BAS BASS -NAMAC ERY 
CA 4 MAC SYM BAS BAS CCN 
CA 5 MAC SYM BAS BASS. NEGFILSTR 
CA § MAC SYM BAS BAS “NEXWITFOR 
CA MAC SYM BAS BAS$_NODNAMER 
CA 8 MAC YM BAS BASS$_NONRESRUN 
CA MAC SYM BAS BASS_NOTENDF IL 
CA G MAC SYM BAS BAS$_NOTENOAVA 
CA 1 MAC SYM BAS BAS$_NOTENODAT 
CA § MAC SYM BA BASS IMP 
OCA MAC SYM BAS BASS _NOTRANACC 
OCA 4 MAC SYM BAS BASS_NOTVALDEV 
OCAO 5 MAC SYM BAS BAS$_NO_ SPA 
OCAO § MAC SYM BAS BASS$_NO_CURREC 
OCAO 3 MAC SYM BAS BAS$_NO_FIEIMA 
OCAO 2238 MAC SYM BAS BAS$_NO_ 
OCAO 39 MAC SYM BAS BAS$_NO_PRIKEY 
OCAO 2240 MAC SYM BAS BAS$_NO_ROOUSE 
OCAO 41 MAC SYM BAS BAS$_NO_RUNSYS 
OCA0 4@ MAC SYM BAS BASS_ 
OCAO 224 MAC SYM BAS BASS$_NUMIMASTR 
OCAO 44 MAC SYM BAS BASS_ 
OCAO 45 MAC SYM BAS BAS$_ODDADBTRA 
OCAO 46 MAC SYM BAS BASS_ 
OCAO 2247 MAC SYM BAS BAS$_ON_STANEE 
J OCAO 2248 MAC SYM BAS BAS$~ON~STAOUT 
OCAO 49 MAC SYM BAS BASS_ A 
OCAO 250 MAC SYM BAS BASS$_PACIDSDON 
OCAO 51 MAC SYM BAS BASS_PLEUSERUN 
OCAO 26 MAC SYM BAS BAS$_PRIKEYOUT 
OCAO 5 MAC SYM BAS BASS_PRIUSIBUF 
OCAO 54 MAC SYM BAS BASS_PRIUSIFOR 
OCAg 55 MAC SYM BAS BASS_ 
OCA 2$ MAC SYM BAS BAS$_PROLOSSOR 
CAO 5 MAC SYM BAS BASS_ 
ae 28 MAC SYM BAS BASS_RECALREXI 
CA 5 MAC SYM BAS BAS$_RECATTNOT 
aA 60 MAC SYM BAS BAS$_RECBUCLOC 
OCA 61 MAC SYM BAS BASS_RECFILTOO 
CA $¢ MAC SYM BAS BAS$_RECHASBEE 
CA 6 MAC SYM BAS BASS_RECLOCFAI 
CA 64 MAC SYM BAS BAS$_RECNOTFO 
CA 65 MAC SYM BAS BASS$_RECNUMEXC 
CA 08 MAC SYM BAS BASS$S_RECSUBCAL 
CA 6 MAC SYM BAS BASS_ a 
CA 68 MAC SYM BAS BASS_RESINSTRA 
CA +4 MAC SYM BAS BASS_RES ERR 
CA 0 MAC SYA BAS BASS$_RETWITGOS 
CA 71 MAC SYM BAS BASS$_RRVNOTFUL 
CA 6 MAC SYM BAS BASS$_SCAFACINT 
CA 7 MAC SYM BAS BAS$~SIZRECINV 
CA 74 MAC SYM BAS AS$_SP_STAOVE 
CA 75 MAC SYM BAS BASS” STANOTFOU 
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e808 Bree Em15ks Tiaksoce LUMSRTe eREIUMSCEC TOR MAR:1 2% (Sey 
CA 26 MAC SYM BAS BAS$_STO 
CA 7 MAC SYM BAS BAS$_STRIMANUM 
CA 4 MAC SYM BAS BASS$-STRIS_NEE 
CA 7 MAC SYM BAS BAS$_STRTOOLON 
CA 0 MAC SYM BAS BAS$_SUBOUTRAN 
CA 1 MAC SYM BAS BASS$_SYNERR 
CA § MAC SYM BAS BAS$_TAPBOTDET 
CA MAC SYM BAS BAS$_TAPNOTANS 
CA 4 MAC SYM BAS BAS$_TAPRECNOT 
CA 5 MAC SYM BAS BASS_TERFORFIL 
CA § MAC SYM BAS BASS_TIMLIMEXC 
CA MAC SYM BA BAS$_TOOFEWARG 
CA 3 MAC SYA BAS AS$_TOOMANARG 
CA MAC SYM BAS BASS$_TOOMANOPE 
CA 0 MAC SYM BAS BASS$_UNDFUNCAL 
CA 91 MAC SYM BAS BASS_USEDATERR 
CA § MAC SYM BAS BASS_VIRARRDIS 
CA 9 MAC SYM BAS BASS$_VIRARROPE 
CA 94 MAC SYM BAS BASS_VIRBUF TOO 
CAO 2095 MAC SYM BAS BAS$~ 
y 38 MAC SYM BAS BASS$_WROMATPAC 
OCAO 98 ; New messages for Basic 2.0, VMS 3.1 
OCAO 99 MAC SYM BAS BASS$_NEGZERTAB 
OCAO 00 MAC SYM BAS BAS$_TOOMUCDAT 
OCA 01 MAC SYM BAS BASS_ERRFILCOR 
OCA 8g MAC SYM BAS BASS$_UNEF ILDAT 
CA 0 MAC SYM BAS BAS$_NOSUPFOR 
CA 04 MAC SYM BAS BAS ERR 
OCA 05 MAC SYM BAS BASS_NETOPEREJ 
CA Bg MAC SYM BAS BAS$_REMOVEBUF 
CA 0 MAC SYM BAS BASS_ EMVAR 
OCA 08 MAC SYM BAS BASS_ EMA 
OCA 09 MAC SYM BAS BASS_IMPERRHAN 
OCA 10 MAC SYM BAS BAS$_ILLRECLOC 
OCA 11 MAC SYM BAS BASS$_REQRECSIZ 
bcp \¢ MAC SYM BAS BASS$_TOOLITDAT 
OCAD 14 ; Module BASS$$REC_PROC 
CAO 315 MAC CALL BAS BASSWAIT 


rs 


Sa 


dh 
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MODULE LIBSAB_CVTPT_O 
MAC SYM 


MODULE LIBSAB_CVTPT_U 
MAC SYM 


MODULE LIBSAB_CVTTP_O 
MAC SYM 


MODULE LIBSAB_CVTTP_U 
MAC SYM 
; MODULE COBSAB_SPANC 
MAC SYM 
; MODULE LIBSAB_CVT_U_O 
MAC SYM 


3¢ 


; Degree equivalents of 


; MODULE :MTHSACOS 
MAC A 


3 
: CALL 
1 3 MAC JSB 
1 356 ; MODULE: MTHSASIN 
1 MAC CALL 
1 MAC JSB 
3 MODULE: MTHSATAN 
MAC CALL 
MAC CALL 
3 MAC JSB 
3 


MODULE : MTHSDACOS 
MAC CALL 


DDD DEDEDE DDD TTT BE PPE EE 


DOOD NIA UE WN S OD NAME WIN 0 OO NAME WIN SO OONAUE WN OOO NOU EW" O 


MODULE :MTHSDASIN 
MAC CALL 

JSB 
MODULE : MTHSDATAN 
MAC A 


CALL 
MAC CALL 
MAC JSB 


3 MODULE :MTHSDSINCOS 

MAC CALL 
MAC JSB 
MAC CALL 
MAC JSB 
; MODULE :MTHSSINCOS 

MAC cone 


MMMM MMMM MMM MMM MMMM MMMM MMM MMMM mnmMmmMmmmMmmmmmnmrmnrmrrmrnmrrrnicnericricnercricviecricyy 


COCO OCOCOCOCOOCSCOOSOOCOOSOOOOCOOOOOOOOOSSOOOSOOOOOOOOOOOOOOOOOOOOOO 


AAA. AAA AAA AA AAI AIAN 
CoCo 08680008 SINISE S 
QOUuFwn—o 

= 


"rSEb=1984 97:48:00 
L18 LIBSAB_CVTPT_O 
LIB LIBSAB_CVTPT_U 
LIB LIBSAB_CVTTP_O 
LIB LIBSAB_CVTTP_U 
CoB COBSAB_SPANC 
LIB LIBSAB_CVT_U_O 


trig functions 


MTH MTHSACOSD 
MTH MTHSACOSD_R4 


MTH MTHSASIND 
MTH MTHSASIND_R4 


MTH MTHSATAND 
MTH MTHSATAND2 
MTH MTHSATAND_R4 


MTH MTHSDACOSD 
MTH MTHSDACOSD_R7 


MTH MTHSDASIND 
MTH MTHSDASIND_R7 


MTH MTHSDATAND 
MTH MTHSDATAND2 
MTH MTHSDATAND_R7 


MTH MTHSDCOSD 

MTH MTHSDCOSD_R7 
MTHSDSIND 

MTH MTHSDSIND_R7 


MTH MTHSCOSD 
MTH MTHSCOSD_R4 


AX/VM 
VMSRT 


S 
L. 


cro 


C 


v04-00 : 
SOMSUECTOR.MAR;1 °% (38) 


Vi 
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arti ae Pi OF Ride VMSRTL.SRCJVMSVECTOR.MAR; 1 - (3B) 
7 MAC CALL MTH MTHSSIND 
8 MAC JSB MTH MTHSSIND_R4 
y 3 MODULE: MTHSDTAN 
MAC ty MTH MTH$D TAND 
MAC JS MTH MTHSDTAND_R7 
3 MODULE: MTHSTAN 
MAC CALL MTH MTHSTAND 


0 
0 


MAC JSB MTH MTHSTAND_R4 


MODULE MTHSGACOS 
MAC NOVECT MTH MTHSGACOSD 
MAC NOVECT MTH MTHSGACOSD_R7 


MODULE MTHSGASIN 
MAC NOVECT MTH MTHSGAS IND 
MAC NOVECT MTH MTHSGASIND_R7 


; MODULE MTHSGSINCOS 
MAC NOVECT MTH MTHSGSIND 
MAC NOVECT MTH MTH$GCOSD 
MAC NOVECT MTH MTHSGSIND_R7 
MAC NOVECT MTH MTHSGCOSD-R7 


MODULE MTHSGTAN 
MAC NOVECT MTH MTHSGTAND 
MAC NOVECT MTH MTHSGTAND_R7 


MODULE MTHSHACOS 
MAC NOVECT MTH MTHSHACOSD 
MAC NOVECT MTH MTHSHACOSD_R8 


MODULE MTHSHASIN 
MAC NOVECT MTH MTHSHAS IND 
MAC NOVECT MTH MTHSHASIND_R8 


MODULE MTHSHATANH 
MAC NOVECT MTH MTHSHATANH 


3 MODULE MTHSHSINCOS 
MAC NOVECT MTH MTHSHSIND 
MAC NOVECT MTH MTHSHSIND_RS 
MAC NOVECT MTH MTHSHCOSD 
MAC NOVECT MTH MTHSHCOSD_RS 


MODULE MTHSHTAN 
MAC NOVECT MTH MTHSHTAND 
MAC NOVECT MTH MTHSHTAND_RS 


VERSION 3.0 ADDITIONS 


Pea AALAALAALAALAALAALAALAALAALAALAALAALAALAALAALAALAALAALAALAALAALAALAAL AAI AAL AAI A As esl As esl es AAAs AAAs AA AA AALS AA AA A A A 
i~h ~~) ~h ~~) ~~ 3-1-3) ~~) ~-4~-) 4-4 ~4~-4-4-4-4 "4-4-4444 4-4-4414 4-444 A re 
SOQOOOOOOOCCOOSOOOCOOCOOCOOOSOSOSS OOOO OOOOOOOOOOOOOOODOOODOOCORO 


APIO OD NANE WIN 99 OD NAME WIN 9 OO NAN E WN SO OD NAUE WN O OONAUE 


PEE FWA NWA AIPOPPONIPONPONIIIDD 2 2 2 BOO OOOO OOOO OOOO OD00O 


PPR PRP P RPP E PPP PPP PEEP EPP PPE EPP PPP PPP PPP EEE 


MODULE : MTHSATANH 
MAC CALL MTH MTHSATANH 


=s 
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v04-00 Page 38 
MSVECTOR.MAR; 1 (28) 


444 
445 ; MODULE :MTHSDATANH 
rr MAC CALL MTH MTHSDATANH 
448 ; MODULE MTHSGATAN 
449 AC NOVECT MTH MTHSGATAN 
450 MAC NOVECT MTH MTHS$GATAN2 
451 MAC NOVECT MTH MTHSGATAN_R7 
126 MAC NOVECT MTH MTHSGATAND 
8 45 MAC NOVECT MTH MTHSGATAND2 
tee MAC NOVECT MTH MTHSGATAND_R7 
o $28 3 MODULE MTHS$GLOG 
45 AC NOVECT MTH MTHSGLOG 
0 458 MAC NOVECT MTH TH$GLOG2 
0 459 MAC NOVECT MTH MTH$GLO0G10 
0 460 MAC NOVECT MTH MTHSGLOG_R8 
8 18) MAC NOVECT MTH MTHS$GLOGTO_R8 
0 188 3; MODULE MTHSHATAN 
0 464 AC NOVECT MTH MTHSHATAN 
0 465 MAC NOVECT MTH MTHSHATAN_R8 
0 108 MAC NOVECT MTH MTHSHATAN 
0 46 MAC NOVECT MTH MTHSHATAND 
0 468 MAC NOVECT MTH MTHSHATAND_R8 
8 4 MAC NOVECT MTH MTHSHATAND2 
0 471 ; MODULE MTH$HLOG 
0 4f6 MAC NOVECT MTH MTHSHLOG 
0 47 MAC NOVECT MTH MTHSHLOG2 
0 474 MAC NOVECT MTH MTHSHLOG10 
0 475 MAC NOVECT MTH MTHSHLOG_R8 
8 228 MAC NOVECT MTH MTHSHLOGTO_R8 
8 478 ; MODULE MTHS$SINCOS (Continued) 
479 MAC CALL MTH MTHSSINCOS 
0 480 M MTH MTHSSINCOS_RS 
481 MAC CALL MTH MTHSSINCOSD 
$36 MAC JSB MTH MTHSSINCOSD_R5S 
6B 3; MODULE MTHSDSINCOS (Continued) 
485 MAC CALL MTH MTHSDSINCOS 
0 486 AC JSB MTH MTHSDSINCOS_R7 
8 487 MAC CALL MTH MTHSDSINCOSB 
: 3 MAC JSB MTH MTHSDSINCOSD_R7 
0 490 ; MODULE MTHSGSINCOS (Continued) 
491 MAC NOVECT MTH MTHSGSINCOS 
$36 MAC NOVECT MTH MTHSGSINCOS_R7 
49 MAC NOVECT MTH MTHSGSINCOSB 
rt MAC NOVECT MTH MTHSGSINCOSD_R7 
£38 ; MODULE MTHSHSINCOS (Continued) 
49 MAC NOVECT MTH MTHSHSINCOS 
rh MAC NOVECT MTH MTHSHSINCOS_R7 
49 MAC NOVECT MTH MTHSHSINCOSD 
500 MAC NOVECT MTH MTHSHSINCOSD_R7 


YRSEYECTOR - Define entry vectors for VMSRTL 
4-00 


MODULE : MTHSALOG 
MAC CALL 


ee 
MODULE “a 4 0V PI 
NOVECT 
MODULE MTHSTAN 
MAC JSB 
MAC JSB 
MODULE oe 
MAC NOVECT 
MAC NOVECT 


MODULE MTHSAL_4_OV_PI 
MAC DATA 


MODULE MTHSALOG 
MAC DATA 


; MODULE MTHSATAN 
MAC DATA 
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MTH MTHSDLOG2 
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MTH MTHS$$AB_ALOG 
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16=SEP 
6-SEP 
CALL COB 
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at : aa ets Fh oF: 18: be VMSRTL.S REV VMSVECTOR.MAR; 1 . (3) 

1 246 ; MODULE COBSIOEXCEPTION -- I/0 error procese ing 

! 344 MAC CALL COB COBSIOEXCEPTION 

1 45 ; MODULE COBSERROR -- Process cane] let codeneetected errors 

: 278 MAC CALL COB COBSERROR 

1 8 ; MODULE COBSINTARI -- Intermediate Data Type Arithmetic 

1 203 MAC CALL COB COBSADDI 

1 50 MAC CALL COB COBSSUBI 

134 551 MAC CALL COB COBSMULI 

134 226 MAC CALL COB COBSDIVI 

135 22 MAC CALL COB COBSDIVI_OSE 

: ; 22 MAC CALL CoB COBSCMPI 

1 $5 556 ; saertonae™ COBSINTER -=- Conversions to and from Intermediate Data Type 

1 ¢ 557 MAC JSB COB COBSCVTDI_R7 

136 558 MAC JSB COB COBSCVTFI_R7 

1 4 559 MAC JSB COB COBSCVTID_R? 

137 560 MAC JSB COB COBSCVTIF_R7 

1380 2561 MAC JSB COB COBSCVTIL_R8 

1388 266 MAC JSB COB COBSCVTIP_ R9 

1390 $20 MAC JSB COB COBSCVTIQ_R8B 

1398 564 MAC JSB COB COBSCVTIW_R8 

13A0 2565 MAC JSB CoB COBSCVTLI_R8 

13A8 2566 MAC JSB CoB COBSCVTPI_R9O 

1380 2567 MAC JSB CoB COBSCVTQI R8 

13B8 2568 MAC JSB COB COBSCVTRIC -R8 

13C0 569 MAC JSB COB COBSCVTRIP_ R 

13¢8 570 MAC JSB CoB COBSCVTRIQ— _R8 

1300 571 MAC JSB COB COBSCVTRIW RBS 

1308 $276 MAC JSB COB COBSCVTTI_R8 

13E9 $2f7 MAC JSB COB COBSCVTWI_R8 

13E8 2575 ; MODULE COBSACC_DATE -- Support for ACCEPT DATE 

13E8 2/8 MAC CALL COB COBSACC_DATE 

13F0 $278 s ROS + oapase DAY -- pavers for ACCEPT DAY 

13F8 S20) CALL COBSACC_DAY 

138 28) : MODULE COBSACC — -- ACCEPT DAY_OF_WEEK 

8 286 MAC CAL COB COBSACT_ DAYWEEK 

1296 584 ; seen COSsAce ue -- Support for ACCEPT TIME 

138 5 CAL COB COBSACC_TIME 

140 5 3; MODULE OY aaa A -- Sypeert for ACCEPT 

139 5 8 CAL COBSACCEPT 

141 288 3; MODULE nf gesOiseL Ar o< cope for DISPLAY and DISPLAY WITH NO ADVANCING 

141 591 MAC CALL COBSD in 

re 236 MAC CALL COBSDISP 

14 594 ; MODULE agree R8 -- Quadword divisten 

i? 232 MAC J3B COB COBSDIVQ_R8 

14 299 3; MODULE DY ate R8 -- Quadword multiplication 

14 598 MAC J$B CoB COBSMULQ_R8 
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4-003 6-SEP-1984 11:48:04 VMSRTL.SRCIVMSVECTOR.MAR; n (30) 

14 599 

14 600 ; ROE COBSPAUSE -- Sites :.' te for STOP 

1? ont MAC CAL COBSPAUSE 

14 08 ROWE COBSCVTPQ_R9 == Packed to Quad We ein 

1e7 one MAC JS6 COB COBSCVTPQ_R 

144 O06 ROLE COBSCVTQP_R9 == Quad to Packed Ay yhetons 

172 608 MAC JSB COB COBSCVTQP 

132 sf ; MODULE COBSCVTRPQ_R9 == Rounded Packed to Quad conversion 

be: eit MAC JSB CoB COBSCVTRPQ_R9 

1450 ig MODULE R eoeedy R9 == Rounded Quad to Packed conversion 

1450 2614 JsB~ COB COBSCVTROP_R9 

1458 2615 

1458 2616 
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:15:59 VAX/VMS M v04-00 P 0 
-SEP- ta:be RCIV ase $4) 


r 
VMSRTL.SRCIVMSVECTOR.MAR; 1 


14 18 ; MODULE COBSMSGDEF -- Defines COB$ all conditon codes 
14 1 MAC SYM CoB COBS_CALFAI 

14 9 MAC SYM COB COBS_CANFAIL 
145 6 MAC SYM CoB COBS_DELINCOPE 
145 6 § MAC SYM COB COB$_DELNO_R_S 
145 6 MAC SYM COB COBS$_DELUNOF IL 
145 624 MAC SYM COB COB$_D1I SMORMAX 
145 625 MAC SYM CoB COBS_EOFON_ACC 
145 6 § MAC SYM CoB COBS_ERRDURACC 
145 6 MAC SYM CoB COBS_ERRDURDIS 
145 6 8 MAC SYM COB COB$_ERRDURSOR 
145 ° MAC SYM CoB COB$_ERRON_FIL 
145 0 MAC SYM COB COBS_ EXPDBOVER 
145 631 MAC SYM COB COBS_FAIFREEVM 
145 6 § MAC SYM COB COBS_FAIGET_EF 
145 o3 MAC SYM CoB COBS_FAIGET_VM 
145 634 MAC SYM COB COB$_FATINTERR 
145 635 MAC SYM COB COB$_FILALRCLO 
145 oa8 MAC SYM CoB COBS_FILALRLOC 
145 637 MAC SYM CoB COBS_F ILALROPE 
145 O38 MAC SYM COB COB$_FILCLOLOC 
145 639 MAC SYM CoB COBS_F ILNOTFOU 
1458 2640 MAC SYM COB COB$_GOTO_ALT 
1028 641 MAC SYM COB COBS_INTDIVZER 
145 0) MAC SYM CoB COBS_INTEXPOVE 
1458 264 MAC SYM COB COBS_INTEXPUND 
1458 2644 MAC SYM CoB COBS_INTRESOPE 
1458 2645 MAC SYM COB COBS_INVARG 
1458 2646 MAC SYM CoB COBS_INVCHANAM 
145 647 MAC SYM COB COBS_INVDECDIG 
145 648 MAC SYM COB COBS_INVLINVAL 
145 649 MAC SYM COB COBS_KEYNOTMAT 
145 650 MAC SYM CoB COBS_LSTHNDLDB 
145 651 MAC SYM COB COB$_LSTHNDUSE 
145 $36 MAC SYM COB COBS_NAMNOTLI 
145 65 MAC SYM COB COBS_NESERRPER 
145 654 MAC SYM COB COB$_NORMAL 
145 655 MAC SYM CoB COB$_NO_NEXLOG 
1628 656 MAC SYM CoB COB$S_NO_NEXVAL 
145 657 MAC SYM COB COB$_NO_SPACE 
1458 2658 MAC SYM COB COB$_NO_USEPRO 
145 659 MAC SYM COB COBS_ OCCDEPOVE 
145 660 MAC SYM COB COBS_OPTMISCLO 
145 661 MAC SYM COB COB$_OPTMISOPE 
145 006 MAC SYM COB COB$_OPTMISREA 
145 66 MAC SYM COB COBS_OPTMISSTA 
145 664 MAC SYM CoB COB$_ORGNOTMAT 
145 665 MAC SYM COB COBS_PRIKEYCHA 
145 096 MAC SYM COB COB$_REAINCOPE 
145 66 MAC SYM COB COB$_REASMAMIN 
145 668 MAC SYM CoB COB$_REAUNOF IL 
145 98? MAC SYM COB COBS_RECACTPER 
145 670 MAC SYM CoB COBS_RECACTUSE 
145 671 MAC SYM COB COBS_RECLOCDEL 
145 or¢ MAC SYM COB COB$_RECLOCREA 
145 67 MAC SYM COB COBS_RECLOCREW 
145 674 MAC SYM COB COB$_RECLOCSTA 
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rat : ae 4 198 94: laioe VMSRTL.SRCJVMSVECTOR.MAR; 1 » %; | 
| 
:* 
: 7 following routines are NO T in the sharable library. They 
: wot Bag tae here to provide a coup ete tabulation of all entr hes 
3 s 


pes ones known to COBOL when this module assembled in the FALL 


MODULE art ae support COBOL CALL 
NOVECT COBSCALL 


erties + maa == Support 7s yt oe 
NOVECT C 


MODULE aa == Support conversion routines 
MAC NOVECT C COBSCNVOUT 


MODULE Beh +4 -- Convert Double to Packed 
MAC NOVECT COB COBSCVTDP_R9O 


‘encorn™ COBSCVTRDP <= Convert Rounded Double to Packed 
MAC NOVECT COB COBSCVTRDP_R9 


MODULE Bey -- Convert Packed to Double 
MAC NOVECT COB COBSCVTPD_R9 


MODULE BY eek -- Convert Double te Quadword 
MAC NOVECT COS COBSCVTDQ_R8 


: ROLE aa = -- Convert Rounded povole to Quadword 
NOVECT COB COBSCVTRDQ_R8 


inate aah -- Convert Quadword to Double 
NOVECT COB COBSCVTQD_R8 


eameane™ COBSCVTFP == Convert Floatin re Packed 
MAC NOVECT COB COBSCVTFP_R9 


PP REESE EWN WINN nonononononongngnd 3 2 2 3 3 3 3 OOOO 


SONA MANE AN 9 OD NAME WIN 9 OD NAME WIN 2 O OD NAME WIN OOO NOUS WN OODNOUE 
. 


; MODULE ee eee =~ Convert Rounded resercane to Packed 
NOVECT COB OBSCVTRFP_R9 
: ROLE COBSCVTPF -- Convert Packed to Floaing 
MAC NOVECT COb COBSCVTPF_R9 
; MODULE il * =-- Convert Floating to Syeduere 
MAC NOVECT COB COBSCVTFQ_R 
; nS COBSCVTRFQ == Convert Rounded releasing to Quadword 
MAC NOVECT COB COBSCVTRFQ_R8 
3; MODULE ae an =-- Convert Quadword to Floating 
NOVECT COB COBSCVTQF_R8 


MODULE COBSEXPI -- CIT exponentiation 
MAC NOVECT COB OBSEXPI 
MAC NOVECT COB COBSEXP1_OSE 


MODULE COBSLINAGE == Support LINAGE 


ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee 
Pe oP oF oe oe oP ot ot ot ot et et ek et kk a a eh ek Sk ek ak ek ek a ak ek ek ek ek ek ek eh he ek ek ee 
Se eee ee ee ee weal ah Ab Ab db Ab db dd db db Ab Ab Ab dh dh Ab dh ah ab db dh ah Ab Ab A ah db Ab ah Ab Ab dh ab Ah db dh ab ab ab bh 
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14 761 MAC NOVECT COB COBSL INAGE 

14 7 § MAC NOVECT COB COBSINIT_LINAGE 

1 17 MAC NOVECT COB COBSTERM_LINAGE 

14 765 ; MODULE Deen BLOCKS -- RMS data block 

1? Peg MAC ROVECT COB COBSAB_NAM 

148 768 ; MODULE Dect aul ie -- Set external switches 

12 18 NOVECT COB COBSSET_SWITCH 

145 771 ; MODULE COBSSWITCH -- Sypgert switches 

12 ak MAC NOVECT C COBSSWITCH 

145 774 ; MODULE AT eats EBC -- ASCII to EBCDIC translation table 

1438 ag MAC OVECT LIB LIBSAB_ASC_EBC 

145 58 3; MODULE nk tbSAs.. CVT_O_U == Overpunch to Unsigned translation table 

1635 re MAC NOVECT LIB LIBSAB_CVT_O_U 

145 780 ; MODULE A eae -£8C ASC -=- EBCDIC to ASCII translation table 

1633 , } OVECT LIB LIBSAB_EBC_ASC 


BA 
BA 
BA 
BA 
BA 
BA 
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BA 
BA 
BA 
BA 
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BA 
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BA 
BA 
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Bs 
BA 
Bs 
Bs 
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POST VMS V ON 2.0 ADDIT 


v04-00 p 
SVECTOR.MAR:1 °° ($3) 
5 


; This point marks where the modules added after VMS Version 2.0 are 

laced (unless yhey fit in some existing hole). 

he vector entries to the shared components come first, and 

; are then followed by the non-vectored (non-shared) entries and the new 

; symbol definitions. 

: There are two flavors of shared components -- those that are 

; vectored and those that aren't. Those that aren't are in the shared 
image solely for the purpose of binding of VMSRTL.EXE, but are not 

; accessible from outside of the image. 


> SHARED COMPONENTS (VECTORED ) 


NI 
0.0 
wr 

Sete Ge Ge Ge Ge Ge Ge Ge te Ge & 


MODULE LIBSLUN 
MAC CALL LIB LIBSFREE_LUN 
MAC CALL LIB LIBSGET_CUN 


MODULE LIBSEF 
MAC 


MAC CALL 
MAC CALL 


MODULE LIBSANALYZE_SDE 
MAC CALL 


E 
E 


8 LIBSFREE_EF 
8 LIBSGET_EF 
8 LIBSRESERVE_EF 


8 LIBSANALYZE_SDESC 
8 LIBSANALYZE~SDESC_R2 


MODULE STRSANALYZE_SDE 
MAC CALL 
MAC 

MODULE LIBSFILESCAN -- 
MAC CALL L 
MAC CALL L 


STRSANALYZE_SDESC 
STRSANALYZE~SDESC_R1 


R 
R 
une files ootehing wile-core description 
B 


LIBSFILE_SC 
LIBSFIND_FILE 


COOWDOOCCDBOSCSCMOOCSC WO WO09O 000000000000 00 CD Co CD CD CD COON CD CD CD00 0D 
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> SHARED COMPONENTS (NON-VECTORED ) 


me ec ec me ee a ek a ed ad ed dd = 8 8 2 4 2 2 
SSS ee... 


SONA MNES 9 OD NA UNE WIN © ODNAUE WIN OOONOAUE WN O 


WANA MAMA AMA ADRIRININININININNND — — 3 3 3 3 B@QOOODOOSOOOO 


B P+ oS ee ee Se ee Se SE Re ee SS 

B 

8 ; MODULE STRSSCHECK_STATUS 

H MAC NOVECT STR STRSSCHECK_STATUS_R2 

B 

>NON=-SHARED COMPONENTS 

B e 

B ; MODULE LIBSAB_ASC_EBC_REV -- Reversible ASCII to EBCDIC trans. table 
: MAC NOVECT “LIB LIBSAB_ASC_EBC_REV 

8 ; MODULE LIBSAB_EBC_ASC_REV -- Reversible EBCDIC to ASCII trans. table 
: MAC NOVECT “LIB LIBSAB_EBC_ASC_REV 

8 ; MODULE LIBSAB_CVTPT_2Z -- packed decimal to zoned translation table 
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MAC NOVECT LIB LIBSAB_CVTPT_2Z 


MODULE nh pesae _CVTTP_Z == zoned to packed decimal translation table 
MAC “NOVECT LIB LIBSAB_CVTTP_2Z 


MODULE nhseernls == execute CALLG seer eet ren 


MODULE ee =SPAnte =~ COBOL SPAN 
MAC “NOVECT COB COBSAB_SPANC2 


MODULE a weed -- LIB general data Md conversion routine 
NOVECT LIB LIBSCVT_DX_Dx 


MODULE Bae ARITH -- perform B pected arithmetic for STRSDIVIDE 
MAC VECT VT_STR K_R9 


4 
5 
$ NOVECT LIB LIBSCA 
§ 3; MODULE O eeteee FAULT == decode inst eyes ren stream 
9 MAC NOVECT LIB LIBSDECODE_FAULT 
§ 3 MODULE LIBSEDIV -- execute EDIV instruction 
7 MAC NOVECT LIB LIBSEDIV 
5 ; MODULE aks esenut. “= execute EMUL instruction 
§ MAC NOVECT LIB LIBSEMUL 
8 3; MODULE ah Jesnoves -- execute MOVC3 instruction 
4 NOVECT LIB LIBSMOVC3 
0 1 ; MODULE ah Jesnovc® =- execute MOVCS instruction 
5 ¢ MAC NOVECT LIB LIBSMOVCS 
0 4 ; MODULE aeons -pecoit -- COBOL translation table for ‘‘de-editing 
3 2 MAC “NOVECT COB COBSAB_DEEDIT 
0 ra wees” COBSDBEXCEPTION -- COBOL Data Base Exception Processing 
8 rf: MAC NOVECT COB COBSDBEXCEPTION 
8 y g C translation table II 
0 
0 5893 
0 4 
0 5 
0 6 
0 7 
0 8 
9 


DD IIS SIO DDE DDD ED TI EE EE 


y 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 
C 


ve 
s 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
F 
FC 
FC 
FC 
FC 
FC 
FC 
F 
F 
F 
F 
F 
F 
F 


ee ee ee ee ee ee ee ee ee ee ee ee YS SS 
PRP RE PEEP EEE EEE EEE EE PEPPER EEE PPP EEE EPP PEEP PPP PPE EE 


€9.0909.00 09 0909 00 09 09 Cd 9 G9 0D G0 Cd OD Cd Cd 69 Od C9 CD CD OD C9 Cd CO Cd CD CD CD Gd Cd GD OD G9 CO GD CD CD CD CD: 


NO LIB LIBSSCVT_STR_PAC 
MAC NOVECT LIB LIBS$CALC_D_R7 
0 MAC NOVECT LIB LIBSSCALC_Q_ 
5 0 MAC NOV LIB LIBSSADJUST Q_R9 
1 MAC NOVECT LIB LIBS$MUL_PACK-R10 
0 § MAC NOVECT LIB LIBS$S PACK_R8 
MAC NOVECT LIB LIBSS$ROUND_R7 
: MAC NOVECT LIB tIBSScVT, PACK_STR_R8 
§ : MODULE | STRSARITH -- tring arithmetic (added entry point STRSDIVIDE) 
: MAC NOVECT STR STRSDIVIDE 
8 § 3; MODULE BS scene =~ FORTRAN underflow handler initialization 
; ay NOVECT FOR FORSINIT_UNDER ¢ 
8 3 3; MODULE BS ey? -- FORTRAN underflow handler ( 
. 7 NOVECT FOR FORSUNDERFLOW_ HANDLER 
B 95 ; MODULE BD  atieag =-- unsigned ** unsigned integer power 
; 39 NOVECT OTS OTSSPOWLULU 
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raat Beenie PFikaids POMSHTS SaesOu toe co Oe mans1 28° 98 
3 MODULE ake ocak CASE_BLIND = gen are stri 1 Epgenot tne 
NOVECT STR STR ASE_BLIND_ COM 
3; MODULE balla FIRST == Find ist char in or not in set 
MAC NOVECT STR STRSF IND_FIRST_IN_SET 
MAC NOVECT STR STRSF IND_FIRST_NOT_IN_SET 
3; MODULE nll tO ite FIRST_SUBSTRING -- Find first substring 
MAC NOVECT “STR STRSF IND_FIRST_SUBSTRING 
;NEW ENTRY POINTS FOR VAX BASIC 2.0 


MODULE Bad 5 -- Basic convert Sout te packed 
CALL BAS BASSCVT 


MODULE A poeaee ** -- add packed lepereitten for BASSCVT_T_P 
MAC NOVECT LI LIBSSADDP_R7 


; — BASSUPI_TERM_10 
; = (use aie addr” “vacated alt LIBSSADDP_R7) 
CALL BASSIN BR 


; MODULE OTSSCNVOUT -- convert floating to E formatted text 
3 (shared, not vectored 
MAC NOVECT OTS OTSSCNVOUT 


; OLD ENTRY POINTS FOR MODULE BASSCVTOUT, originally overlooked 
MAC CAL BAS ASSCVT =ut 


mn 


ee ‘oy in -wim's 


B 
MAC CALL BAS BASSCVT~ ure 

; NEW ENTRY POINTS FOR MODULE BASSCVTOUT, Basi 
MAC CAL BASSCVT ~but 


“F_ 
“D- 
“D- 
“D- 
75 output conversion 
“6_ 
“6_ 
~H_ 
“H_ 
“H_ 
me 
P- 


SSCVT_ ur 
MAC CALL BAS BASSCVT_OUT_P_G 
; NEW ENTRY POINTS FOR MODULE BASSCMPAPP, abacte compare approximate 
MAC CALL BAS BASSCMPG_A 
MAC CALL BAS BASSCMPH_ APP 
NEW ENTRY POINTS FOR MODULE BASSSCOPYFD, Basic copy floating 


(shared, not vectore 
MAC NOVECT BAS BASSSCOPY_G 
MAC NOVECT BAS BASSSCOPY_H “RS 


; NEW nee? wowty f FOR ot nae Basic NUM function 
MAC CALL BAS BASSNUM_ i 


watt ai i aad ad ad adadabadabadtmiadtmiadtai wate Baiada abated ababmabambabadadbabadbadabadad abad adadadabadabad 
PUPP SEPP BB Be BS Be BB BB BB PP PPP PPP PPP PPP PPP PPP PLETE 
PPP PPE EPMA) | SOOO BAWMMMMIOOVOOOOOOOOCWWWWVIVIOVIOIVIWIWOOIOIOIOOOwVOIOIIoOw 


DWOOCOCOCOCOCOCOCDBOOCODPODBOWODOWOWWODODOOCOCOCCCOBBAaMsDDDooooooooooooooo 
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VMSRTL.SR REIV VMSVECTOR.MAR; 1 3) Sy 
; 935 MAC CALL BAS BASSNUM_P a 
1 328 : NEW ENTRY POINTS FOR MODULE BASSNUM1, Basic NUM1 function 01 
155 938 MAC CAL BAS BASSNUM 01 
1560 295 MAC CALL BAS BASS$NUM1_H 01 
$ 360 MAC CALL _—s-BBASS BASSNUM1_P a 
135 96¢ : NEW ENTRY POINTS FOR MODULE BASSSTR, Basic STR$ function 01 
157 36 MAC CAL BAS BASSSTR_ : 01 
1578 2964 MAC CALL BAS BASSSTR- 01 
138 969 MAC CALL _—s-BBASS BASSSTR- p o1 
12 309 3 NEW ENTRY POINTS FOR MODULE BASSUPI TERM_IO, Basic UPI level 1/0 OT 
1588 2968 MAC CAL BAS $o0T_G_0_S OT 
1290 969 MAC CALL BAS Bas spurt -¢- Vv “3 O17 
159 970 MAC CALL BAS BAS$OUT_G_V-C O17 
120 971 MAC CALL BAS OUT"H-V"S OT 
15A 378 MAC CALL BAS BASSOUT_H_V_B OT 
1580 297 MAC CALL BAS BASSOUT_H_V-C OT 
1288 974 MAC CALL BAS BASSOUT-P_DR_S OT 
15C 975 MAC CALL BAS BASSOUT_P_DX_B oT 
15C8 2976 MAC CALL BAS BASSOUT-P~DX"C OT 
1500 2977 MAC CALL BAS BASSIN_G_R 01 
1508 2978 MAC CALL BAS BASSIN-H_R 01 
1360 979 MAC CALL BAS BASSIN~P_Dx oI 
138 981 ; NEW ENTRY POINTS FOR BASS$VAL, Basic VAL function OT 
15€8 4 MAC CALL BAS BASSVAL_G oT 
15F0 98 MAC CALL BAS BASSVAL_H oT 
1368 3 4 MAC CALL ~— BASS BASSVAL_P or 
1600 ob ; MODULE BASSS$REC_PROC oT 
1600 2987; this is needed. for BASSANSI_TAB, a non-shared entry point oT 
1600 98 MAC BAS ~BAS$SREC _WSL1 Rt 
1608 2990 ; MODULE aRAst ino new entry point ST 
1608 931 MAC call BAS BASSF IND_RFA $! 
1610 2993 ; MODULE aRasset. new entry point $1 
1610 99% MAC CALL BAS BASSGET_RFA 3! 
1618 996 : MODULE BASGETRFA, new $1 
161 99 MAC CALL BAS BASSGETRFA 1 
16 8 999 ; MODULE ppascs. oie entr gotne must be vectored for improved BASKILL 
16 8 MAC CALL BA BASSSNEXT. LUN 
16 ¢ 3; MODULE »Rastones new entry poin 
16 : CALL ~—siBAS BASSANSI_ INPUT 
16 5 ; MODULE fasicee new entry point 
16 6 MAC CALL = BAS BASSANSI_I0_END 
16 3 ; MODULE aRASCTRLe all entry points 
16 MAC CALL —sBAS BASSCTRLC 
164 10 MAC CALL _—s- BASS BASS$RCTRLC 
164 11 MAC CALL _—s-BASS BASSSCTRLC_INIT 
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4-003 MTHSSABLALOG = Table for ALOG routines GaSEP=1984 Iiiabson LUMSKTe. cacdomecccooR.man:1 P29 <92, 

162 1 -SBTTL MTHSS$AB_ALOG = Table for ALOG routines 
16 16 ; 
188 19 ; The MTHS$AB_ALOG table is mpceress by the low order exponent bit and the 
165 18 ; first 7 fraction bits (not including the hidden bit) of the argument. The 
165 19; table entries are offsets into the FHI table. Note that the 
165 Q ; MTHS$AB_ALOG table is data type independent and is used by all four LOG 
192 0 1; routines, 
165 5 : This table is a duplicate of that in MTHALOG.MAR, but must remain 
165 024 ; separate. 
192 8 5 
165 § 
165 027 MTH$$AB_ALOG: 

04 04 04 04 04 04 04 04 165 028 «BYTE “X04, *X04, “X04, “X04, *X04, “X04, “X04, “X04 

04 04 04 04 04 04 04 04 165 029 ~BYTE “X04, “X04, “X04, “X04, “X04, “X04, “X04, “X04 

09 09 09 04 04 04 04 04 166 030 ~BYTE “X04, “X04, “X04, “X04, “X04, *X09, “X09, “X09 

09 09 09 09 09 09 09 09 1668 ba ~BYTE *X09, “X09, “X09, “X09, “X09, “X09, “X09, *x09 

09 09 09 09 09 09 09 09 4 3 ~BYTE “X09, *X09, “X09, “X09, “X09, “X09, *x09, “x09 

OE OE OE OE OE OE OE OE 167 03 ~BYTE “XOE, *XOE, “XOE, “XOE, “XOE, “XOE, “XOE, “XOE 

of of of OE OE 0 3 0 198 034 ~BYTE “XOE, “XOE, “XOE, “XOE, “XOE, “XOE, “*XOE, “x0 

13 13 13 15 13131313 16 035 BYTE (PRIS, MRS. ORS. MRIS. MNS. CRIS, SRS. ORT 

18 18 13 13 13 131313 169 036 -BYTE “X13, “X13, “X13, “X13, “X13, *X13, “X18, *X18 

18 18 18 18 18 18 18 18 1698 3037 ~BYTE “X18, *X18, “X18, “X18, *X18, *X18, *X18, *x18 

1D 1D 1D 1D 1D 1D 10 18 16A0 3038 BYTE “X18, “X1D, “X1D, “X1D, *X1D, “X1D, “X1D, “X1D 

22 $s 5§ $s 22 $ 1D 1D 16A8 3039 ~BYTE “*X1D, *X1D, “X cS “X22, “Xx $e “X22, *X $ X22 

gf 2 ¢ 7 7 22 1680 3040 BYTE “X22, “X27, “N27, “X27, “X27, “X27, ‘ ange 

1 31 31 31 2C 2C 2c gf 16B8 3041 oeVicg §86 Ret, “Ree. “Hels MNele MNS ORS. MRS. ORS) 

45 40 40 3B 3B 36 36 36 16C0 bes ~BYTE “X36, “X36, “X36, “X3B, “X3B, “X40, *X40, “X45 

FF FF FF FF FF FF FF FF «416C8 304 -BYTE “XFF, “XFF, “XFF, “XFF, “XFF, “XFF, “XFF, “XFF 

32 37 3C 41 FF FF FF FF 1600 3044 -BYTE “XFF, “XFF, “XFF, “XFF, “X41, *X3C, *X37, *X32 

23 23 28 28 28 2d $8 38 1608 3045 «BYTE al3e- akse- “X2D, *X28, “X28, “X28, “X23, “X23 

19 1E 1E 1€ 1€ 1E 23 23 16€0 3046 omile . “Eds, “Rese “RIE; “RIE. “RRs “NIE e “RIE. MHIE 

14 14 19 19 19 19 19 19 1668 3047 eBYTE “X19, “X19, °X19, “19, “X19, “X19, “N14, °X14 

OF 14 14 14 14 14 14 14 bf 048 ~BYTE “X14, “X14, “X14, “X14, “X14, *X14, °X14, “XOF 

OF OF OF OF OF OF OF OF 16F 049 ~BYTE “XOF, “XOF, “XOF, “XOF, “XOF, “XOF, “XOF, “XOF 

OA OA OA OA OA OF OF oe 170 050 ~BYTE “XOF, “XOF, “XOF, “XOA, “XOA, “XOA, “XOA, “XOA 

OA OA OA OA OA _ OA OA 170 051 ~BYTE “XOA, “XOA, “XOA, “XOA, “XOA, “XOA, “XOA, “XOA 

05 05 05 05 0A 0A OA OA 171 beg ~BYTE “XOA, “XOA, “XOA, “XOA, “X05, “X05, “x05, *Xx05 

05 05 05 05 05 05 05 05 171 5 ~BYTE “X05, “x05, *x05, “x05, “X05, “x05, *x05, *x05 

05 05 05 05 05 be 05 05 1720 3054 ~BYTE “X05, “X05, “x05, “x05, “X05, “x05, “x05, “x05 

00 00 00 00 05 05 05 05 1728 3055 ~BYTE “x05, *x05, “x05, “x05, “x00, “x00, “x00, *x00 

80 00 00 00 00 00 00 00 1738 3087 "BYTE “X00. “X00, “X00; “400, “X00, “X00, “X00, “x00 

a6 50 00 06 $6 $0 $6 $6 1740 088 -BYTE “X00. “X00, “x00, *x00, “x00, “x00, “x00, “x0 

00 00 00 00 00 00 00 00 1748 3059 ~BYTE “x00, *xX00, “x00, “x00, “x00, “x00, “x00, *x00 
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-SBTTL MTHSSAB_ATAN = Table for ATAN routines 


=z 
4 
xv 
Ano 
wen 
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The MTHS$AB_ATAN table is a table of ayte oncr ves used to obtain an index 
into aa a N_TABLE. MTHSSAB. ATAN is indexed usi ng the low order bits of 
the field and the high order bits of the fraction field. The 
MTHSSAD™ RATAN table is independent of the data type and is used by all of 
the arcfangent routines. 


This table is a duplicate of that in MTHATAN.MAR, but must remain 


separate. 

MTHSSAB_ATAN: 
0 -BYTE “X00, “X00, *X00, “X03, “X03, “X06, “X06, *Xx09 
9 “BYTE “x09, “X09. *XOC; SXOG, 2x0C. SXOE, 2x0F, 2x1 
2 “BYTE “X12, “X12. *X15. “X15, “X15. “X18. *X18, *X1 
B “BYTE “X1B, *X1B, *X1B. “X1B. “XIE. “XIE. “XIE. *X21 
1 -BYTE X21, *X21, *X21, “X21, “X24. *X26, °X26, “X26 
4 “BYTE “X24, “X24, *X27, *X27, “X27. “X27. “X27. *K27 
7 <BYTE “X27, “X27, *X27, *X27. “X27, “X27, *X27 


ot et 
Bi a Sie Bi Bn i 


COOCOCOOCCOCOCOCOCCOOCOOOOOOOoOoO 


COD C8 NI NINN SN NSN NOAA AAO OOOrornm 


MRO OONOUES WN OOONO US wr 


3, 


71 
(35) 


Page 


o V04-00 
VMSVECTOR.MAR; 1 


| ei seni see ae gee ane nel, eet seek eel eel seal et peel eerie el sel soe eel ae cee ce eee ee ee ee ee cee ce ee el el cel cl col eel cel ce col ce ol oe cee cl el el al oe el ee ol oe oe ae ol a 


C$ HFOOOOOOOOCOCOOOOOOSOSOOOOSOOSSSOSOSS SOOO OCOOCOCOOOOOOOOOCOOOOOOCOOOOOO 


8 VQOVVVO VO VIN OVYVOGO VIVO VO SSUYV I GOO OSOOISOVOVOSOVOSO VIN OSO VIG VI IV VIV9VVV9VVVIVVVVVVUYV 
@aancaeaancacacacacaacaacacaacacacacaectcaacactcaeaacaeacaaacaeacacancacacancaacaacac 


STF DOOOCOCOCOSOOOGOOOOOSSOSSOOOOSSSOSOSOSSSOSSOOSSOSOSOSOSOOOSOOSOSOSOOOOOoOOOSooOoO 
ND COOSOOCOOOOCOCOOOOOCSSOOSOSOSOSOOSSOOSSSSSOSOSSSOSSOSOSOSOSSSOSOOOSOOOOOOOOOOoOO 
wo 
-— wT 
Ne 
o- 
ww 
coco 
ao 
om 
$s 
aa 
wus 
ran 
ono a coco 
- « a cao kad _ 
Oo ax ' © = aoe ed 4 Qvrnagv 
>v< oO uwmw _ >aAZzo an eee es 
Wu -vetaeuuwOoo <>< a2e< '(i>s>>>>> 
oOo ww. woovor | eeereerrooroaor2-awow.oria aa eespee 
~m a ‘es wwooeis £8 bt ee Ft tka kk ee em tl tll t's ew Ootwace ooOouu 
- oO ocoow aii! 6r&r-kD>-MOovwOtTtIjarBwa tit err n——m— 8 8 tt t tse Feet 
2S SSS SW ee ee See OOM 8 tt tt eee ee} EEE EE EEE SEES OR eee 
Vv SCS Cees OWE ESS SSS SSSSSZSZSZSZZOH EE I BID DID DD IDB IDB DB IIT 2 ZA. 
PAPARPAAA PD AAA AAA PKA PAPA A AAA AA AAA A BAAAPA RAAAPFAAAAHAAPABAAAA AAA 
AMNAAANANAAMNKHANAMNVNMAAAMNANAAANAAMNIMNANKAIMNKHMAMNMNKNKWMVKWMAKHMNAMNAMWMNMMNMMNMMAMKMMKMMKMMMNNMVMMMMNMM 
Se oe Sp Spe So Sm Se Sp Se Spee Spe Spee ew Sow Spe Spe pe pw Spe Sp Sow ow pw pw pw p> Spm pw pw pw Sop pw Sow Spe Spe pw Sw pw Spe pw Sow Sow Sow Sow Sow pw ow ow pom» o> o> > > > > > I 
DOOM MOOOMMOAMMOOOWMMOMOMOMOMOMDOMOMOODOOOOMDADAMUAOMDODODOODOOMODADOOOOMOOOOOOOOOOOOHO 
APA APAAFPHA A AAPA A A A AAR AAA PA A AAPA AAPA PA PAP PA APA PAAA FA AAAAAAAARAAAGA 
PARAAHAA AAA AAHAAAA ABDAAAPA PA AAA AH AAA ABA AA AAD AA AAPA AA PDA AAAAAAAAAAPAARAAAAA 


OO 


COOOOOOCOOOCOOOOOCOSOSOSOSOGSOOSOSOSOSOCSOSOSOSOSOOSOSOSSSOSOOSSOSOOOSOOOSOSOOOOOOOSCOoSCoO 


VVVOVOVOVO VOY OO GOIV GOVOS GOO OSIVOSGIVO SSG IVEYV SO GCVS SO VEVG GVV9VVVCVVGOVeouguoE"_0CNU9 
@aacacaacaacacaccacacacacaancacaacacaecacaacaancaacacaacacacaacacaancacacaecac 


DOODDDDOOCODODODODODNDODDOOOCODDODODDODOOCDDODODODODOOSODODODS 
OR FOL UIOAS OW OM DV OWOOKIPI ST ONT ODOM 0 OW OW. & OO HON MW ST TINNED 
OOoOOCOr-OO-OSO—-GOoooooooo--—-oo 


- Define entry vectors for VMSRTL 


Adee Ouse tee Ouse Osu © 
t#eepeeeeeepeepesed 
e0ou.4.V00TITsTaAAa 
@#eerpevesveuedte 
[i eel andl aed anlteend antl aed ond andand ana So 


NIT 


— 
on 
ez 
we 
~ 


SL 
T 


0 


VMSSVECTOR 
Symbol table 
SSBASSSOPEN 
SSBASSSRECO 
SSBASSSSIGNAL_10 
SSBASSSSTATU 
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Symbol table - P1984 9 :48:04 CVMSRTL.SRCIVMSVECTOR.MAR; 1 . (33) 
LIBSSGET1_DD eenereee =X 1 MTHSDATAND_R7 eeeeenee = § ¥ 1 
LIBSSGET1"DD_R6 eeeneeee =X 1 MTHSDATANH” eeeeeeee =X 1 
LIBSSHOW_JM ~ eeeeeeee =X 1 MTHSDATAN_R7 eeeeeeee 1 
LIBSSIGNAL eeeeeeee =X 1 $DCOS teneeeee =X 1 
LIBSSIG_TO_RET eeeeeeee =X 1 $DCOSD eeeeeeee =X 1 
LIBSSKPC weneteee §6X 1 MTHSDCOSD_R7 eeeneeee =X 1 
LIBSSPANC eeeeeeee = §=6X 1 $DCOSH eeeeeeee =X 1 
LIBSSPAWN eeeeeeee 8 =X 1 MTHSDCOS_R7 aeeeenee x 1 
bess eeeneeeer = =X 01 MTHSDEXP eeeeneee =X 1 
LIBSS eereeeee =X 1 MTHSDEXP_R6 aeeeeree 8 X 1 
LTBSTPARSE eeerenee = § 1 $DLOG aeeeeere xX 1 
MTHSSAB_A 90001838 R 1 $0L0G1 eeeeeeee =X 1 
MTHSSAB_ ATAN 1 R 1 MTHSDLOG10_R8 eeeneeee =X 1 
MTHSACOS eeeeeere xX 4 $DLOG2 eeeneeee =X 1 
MTHSACOS eeeeeeee = §=6X 1 MTHSDLOG_R8 eeeeeeee =X 1 
MTHSACOSD_R4 eeeneeee =X 8 01 MTHSDSIN eeeeeeee =X 1 
MTHSACOS_ eereeeee =X = 01 MTHSOSINCOS eereeare 8 §86X 1 
MTHSALOG eeeeneee =X (01 THSDSINCOSD eeeteeee =X 4 
MTHSALOG1 teeeeeee =X 8 01 MTHSDSINCOSD_R7 eeekeeee =X 1 
MTHSALOG10_R5 eeeeeeee =X 8601 MTHSOSINCOS_R eeeneeee =X 01 
MTHSALOG2 teeneeee =X 01 THSDSIND teeeeeee = X 01 
MTHSALOG_ teeneeee =X 01 THSDSIND_ teeeeeee =X 01 
MTHSAL 4 OV_PI eeeneeee =X 01 MTHSDSINH eeeeeeee = X 01 
MTHSASIN teeeeeee =X 01 MTHSDSIN_R7 eeeeeere§ Xx 01 
MTHSASIND eeeeeeee =X 8 04 MTHSDSQRT eeeeeene x 01 
MINSASIND RG eeeeeeee =X 01 MTHSDSQRT_RS5 aeeeeere =X = 0] 
MTHSASIN_ RG keekkene g 9 SDTAN kekkenee . oe 
MTHSATAN eeeeeeee xX 01 DTAN eeeeeeee XX 01 
BTHSATANZ eeeeneee =X (01 MTHSDTAND_R7 eeeaneee =X 01 
THSATAND eeeeeeee XX 01 SDTANH eeeeeere XxX 01 
MTHSATAND2 eeeeenee =X 01 MTHSDTAN_R7 aeeeeeee = KX 01 
MTHSATAND_R4 eeekkeee x 01 MTHSEXP eekeeeeee x 01 
HSATANH kekkkkee x 01 shits de R4 eeekeekh x 01 
TWSATAN. R4 eeeneeee = X 01 MTHSRANDOM eeeeeeee =X 01 
THSCABS— eekereee x 01 MTHSSIN ektkeeee x 01 
MTHSCCOS eeeereee = X 01 MTHSSINCOS eeneeeee =X = 1 
MTHSCEXP teeeenee X 01 MTHSSINCOS teeeeeee X01 
MTHSCLOG eeeeneee = X 01 MTHSSINCOSD_R5S aeeneeee =X 01 
MTHSCOS teeneeee = X 01 MTHSSINCOS_R5 eeeeneee = X 01 
MTHSCOS teeneeee =X 01 SSIND eeeeneee =X 01 
MTHSCOSD_R4 eeeeeeee =X 01 MTHSSIND_R4 teeneeee =X 01 
SCOSH” eereeeee xX 01 SSINH eeeeeeee YX (1 
MTHSCOS RG eerekeee x 01 MTHSSIN R4 eekeeeee x 01 
SCSI eeneeeee =X 1 MTHS$SQRT eeeeeeee = =§=6X 8 
MTHSCSOQRT eereeere § xX 1 MTHSSQRT_R eeeeeere x 1 
SDACOS eeeeeeee =X 1 nTWsSORT JR eeteeere = §=6X 1 
MTHSDACOSD eeeereee = §=6X 1 THSTA eeeeeeee =X 1 
MTHSDACOSD_R7 eeerenee 8 6X 4 ST AO aeeeeeee = § X 1 
THSDACOS_R7 eeeeeree = X 01 MTHSTAND_R4 eeeenere = X 01 
MTHSDASIN teeeeeee = § x 1 MTHSTAND_RS aeeeeeee = =X 1 
ATHSDAS terereee x 1 HSTAN geeeenee x 1 
MTHSDASIND_R7 eeeeeeee = §=6X 1 MTHSTAN_R4 eeeeeere =X 1 
MTHSDASIN_R7 eeeeeeee 1 THSTAN aeeeeree 1 
THSDATAN— eeeetere =X 1 OTSSSCVT_D_T_R8 eeeeeeee =X 1 
MTHSDATAN2 weneeeee =X 1 OTSS$CVT_G_T RE eeeeeree =X 1 
MTHSDATAND eeeneeee §6X 1 OTSSSCVT_H_T_R wieeeere =X 1 
MTHSDATAND2 eeeeeere 86 X 1 oTsscvT_C_TB eeneeeee Xx 1 
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OTSSCVT_L_TI 
OTS 


oO 

——4 

n” 

e 

o 
<< 

ag 

y 

a 
t tts. 
ceoeeecNnor 


$s D 
OTS$SGET1—DD_R6 
SSTARI” 


RTL$ST 
STRSANALYZE_SDESC 


ZE_S 
STRSANALYZE-SDESC_R1 
STR ee 14 


ARE 
STRECOMPARE _EQL 


STREGETI_DX_RG 
ST FT 

STR R 
STRELEN EXTR 
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Reeeeene 
RRaeKKES 
RHKERRAEE 
ReReeKKe 
Reeeeeee 
REERREKE 
Reeekkee 
Reeeeeee 
RRRRRKEE 
ReREREEE 
RRERREEE 
RERREREE 
REERRAEE 
WREAK 
ReReRkee 
RRERRERE 
RRERRERE 
RRERKEEE 
ReReeeke 
RREKREEE 
RREKKERE 
RReRKEKE 
Reker 
REE 
RRERREKR 
RRARREEKE 
RREEEKEE 
REERREEE 
RREEKEEE 
RReeKKER 
RERRKKEE 
ReeeKKKE 
RERREEKE 
00000000 
ReERRKEKE 
RERRKEKE 
Reeekeee 
RReEKKEE 
Reeeekee 
Reeeeeee 
ReeeKEEE 
Reeeenee 
RReKRREE 
geekkeke 
Reeeeeke 
geeeenee 
Reeekeee 
Reeeeeee 
geereeee 
reeereee 
geererere 
Reeeeeee 
eeeeeree 
gekeeeee 
geaekeree 
reererne 
geeerene 
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REARHREE 
REAREEEE 
RRAKEERE 
RRAREREE 
RRERREE 
RHRRRHRE 
RRRERREE 
RERRREEE 
RERKREEE 


AX/VM 
VMSRTL. 
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VMSSVECTOR 
Psect synopsis 


$ewoe usw een nen weat 


! Psect synopsis ! 


sec ene ese mosas + 


PSECT name Allocation PSECT No. Attributes 
_ Oe x B88 0000 ( a} 69 ( 0.) NOPIC USR CON ABS _ LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
SVMSSVECTOR 000017 ( 6023.) O01 ¢ 1.) PIC USR CON REL LCL SHR EXE RD NOWRT NOVEC PAGE 


pooorecescen woeweeoeecoece + 
! Performance indicators ; 


perenne mam EE Oe Se Se ee 


Phase Page faults CPU Time Elapsed Time 
Initialization ¢2 00:00:00.09 00:00:00.72 
Command processing 135 es BS BF B02 82 
Pass 799 00:01:03.40 00:01:50.18 
Symbol table sort 0 00:00:01.57 00:00:02.25 
ass 475 00:00:17.00 00:00:41.89 
Symbol table output 1 00:00:00.79 00:00:01.75 
Psect synopsis output 0 00:00:00.02 00:00:00.02 
Cross-reference output 0 es BS 00:00:00.00 
Assembler run totals 1441 00:01:23.48 00:02:40.68 


The working set Limit was 2400 pages. 

319752 bytes (625 pages) of virtual memory were used to buffer the intermediate code. 

There were 60 pages of symbol table space allocated to hold 1092 non-local and 0 local symbols. 
3082 source Lines were read in Pass 1, producing 93 object records in Pass 2. 

3 pages of virtual memory were used to define 2 macros. 


$oweeeeeeeocceeoccosscecoce} 


! Macro Library statistics H 
$eweeowoeeooeeoeeeeoooeeecece 


Macro Library name Macros defined 
“S25SSDUAZB:(SYSLIBISTARLET.MLBs200 0 
0 GETS were required to define 0 macros. 

There were no errors, warnings or information messages. 


MACRO/ENABLE=SUPPRESSION/LIS=LIS$:VMSVECTOR/OBJ=OBJ$: VMSVECTOR MSRC$:VMSVECTOR/UPDATE=(ENHS: VMSVECTOR) 
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